tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Дано целое число к. вывести
Дано целое число к. вывести число к на экран
scaier
1 16.09.2019 04:50
0
Ответы
Совушка09
07.10.2020 19:02
Var
k:integer;
begin
writeln('Введите чило k = ');
readln (k);
writeln('k= ',k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Бекзатажеси
07.10.2020 19:02
// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
Writeln('Ваше число -> ', ReadInteger('Введите k ->'));
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
conyp2005
03.10.2019 09:31
Составьте программу которая заполняет массив a[1..10]случайными целыми числами в диапазоне от 1 до 10 затем приеобразовыет его увеличивая все элементы с чётными значениями на 1....
n2324
03.10.2019 09:31
Как добавить анимацмю в программе power point ( в призентацию)...
annaoroku3
19.04.2021 18:24
Найди в сети интернет информацию о том, почему изображённый на рисунке носитель сейчас не используется? ...
lika369
13.04.2020 14:28
3 задание, подсказка: верхнюю строку и левый столбец заполняют единицами, остальное по правилу: для каждый клетки необходимо складывать числа из клетки левее данной и из клетки выше...
belozerovanastya
13.04.2020 14:28
Заполнить массив случайными числами в интервале {-10..10) и подсчитать количество отрицательных элементов....
lessy2014owrwk6
13.04.2020 14:28
сделать №3 как АЛГОРИТМ (обязательно)Что такое алгоритм есть внизу......
jankirik
13.04.2020 14:28
Определите, какую задачу решает программа на Паскале:program test2;var SL: string; i: integer;beginreadln(SL); i:=1;while (i =l) and (SL[i] * ) and (i =length(SL)) do begin SL:=SL+...
evakuleva
13.04.2020 14:29
НОМЕР 10 11 ХОТЬ КАКОЙ ТО РЕШИТЕ...
denissneganatan
13.04.2020 14:29
Запиши доменное имя компьютера, зарегистрированного в домене первого уровня ua, домене второго уровня beseda и имеющего собственное имя www....
Lero4ka222
13.04.2020 14:29
Переглянте сайт Зелена хвиля. Записати які елементи сайту відповідають вимогам ергономіки ,а які ні. Записати у чому могла б оптимізація сайту....
Популярные вопросы
Маса масла становить 3 кг. знайди 3/10 маси цього масла...
3
Собственная скорость катера равна 34км/ч, а скорость течения 3,2км/ч. сначала...
1
Фотография, на которой меня нет 1)как относились деревне к учителям? как и за...
3
Установите соответствие между величинами и формулами: а. закон джоуля-ленца б....
3
Разберите слово по составу. учиться...
3
(x-1)(2log^2(3)x-5log(3)x+2) 0 3-это основание...
2
Який номер має перший додатний член арифметичної прогресії -10,4 ; -9,8; -9,...
3
Решите ♥♥♥ уравнение : (y-2)^2-8y=(y-3)(3+y)-2y...
1
На координатной плоскости отметьте точки a(-2; 7),b(6; 10),c(10; 3) и d(2; 0).найдите...
1
Егер саған бір күнге ғана жетерлік уақыт ішінде ерекше бір сиқырлы күш бітсе,...
1
k:integer;
begin
writeln('Введите чило k = ');
readln (k);
writeln('k= ',k);
end.
// Внимание! Если программа не работает, обновите версию!
begin
Writeln('Ваше число -> ', ReadInteger('Введите k ->'));
end.