tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Нужно написать программу,
Нужно написать программу, которая будет находит все чётные числа, не превосходящие число n
veroonikanovit
2 01.10.2019 06:00
0
Ответы
lox54
09.10.2020 07:09
var
a,n,i:integer;
Begin
read(n);
For i:= 1 to n do
If i mod 2 = 0 then
writeln(i);
end.
На паскале
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Roma99812
30.07.2019 02:00
Найти объем звука, записанного в режиме моно с частотой дискретизации 8 кгц и разрядностью 16 бит, продолжительностью 1,5 мин....
maksimovaa1
30.07.2019 02:00
Найти время звучания звукового фрагмента в режиме моно записанного с частотой 32 кгц, разрядностью 16 бит, занимающего на диске 700 кбайт....
BC122
30.07.2019 02:00
и не говорите что это легкотня! просто напишите ответ!...
pvpgame2345
16.05.2020 14:50
Пример взвешенного графа ...
DashaHB16
16.05.2020 14:51
Підсумкова контрольна робота з інформатики 8 клас Оберіть правильну відповідь 1. Числовий код призначений для опрацювання людиною та використовується для впорядкованого зберігання...
popdaniela820
23.05.2019 06:00
Текст содержит 4 кб информации на двух стр. определить кол-во строк, если кол-во символов в строке-64...
MIO05
29.04.2021 11:21
Сколько существует видов гиперссылок? * 53246...
айсу17
12.02.2021 17:47
Python Импортируйте numpy. Создайте матрицу (2D-массив) случайных действительных чисел (тип с плавающей запятой) размерности (5, 7). Случайные числа должны быть от 0 до 1. Отобразите...
reginasachtova
12.02.2021 17:47
Напишите программу, которая в последовательности целых чисел определяет их количество и сумму чётных чисел до первого введеного нуля...
JennieBlackpink1996
12.02.2021 17:51
Напишите программу, которая в последовательности целых чисел определяет их количество и сумму чётных чисел до первого введеного нуля. ПАСКАЛЬ....
Популярные вопросы
Запишите неравенство,которое получится,если к обеим частям неравенства....
3
Составь задачи по схемам. Мне только б нужно...
2
14. Отрезок верёвки длиной 204 см разрезали на 4 равных куска. С какого выражения...
2
Какие меры могла применить Советская власть к авторам «Письмо пяти»...
3
Панов, занимавшийся коммерческой деятельностью совместно с Федорченко, обнаружил,...
2
Продолжи пословицу Смелого пуля боится, смелого враг не найдёт враг от него не...
1
Архитектурный стиль собора святой софии...
3
3. у початковий Момент активність деякої радіоактивної речовини складала 1,2*10⁷...
2
Айгул мен ажесынын арасындагы сыйластыктын сыры неде?...
2
о чем теуст? Каком стиль относиться? ...
2
var
a,n,i:integer;
Begin
read(n);
For i:= 1 to n do
If i mod 2 = 0 then
writeln(i);
end.
На паскале