Помогите пожалуйста! (Паскаль)
На числовом промежутке от 10 до 20 вывести по порядку все числа на экран в порядке возрастания (в столбик). Каждое число, выведенное на экран сопроводить записью «четное» или «нечетное»
На числовом промежутке от 10 до 20 вывести по порядку все числа на экран в порядке возрастания (в столбик). Каждое число, выведенное на экран сопроводить записью «четное» или «нечетное»
More Questions From This User See All
Answers & Comments
Ответ:
Объяснение:
program even_odd_numbers;
var
i: integer;
begin
for i := 10 to 20 do
begin
writeln(i);
if i mod 2 = 0 then
writeln('четное')
else
writeln('нечетное');
end;
readln;
end.