Вывести ** экран все четные числа, начиная с числа N и заканчивая числом MПодсказска:i...

0 голосов
47 просмотров

Вывести на экран все четные числа, начиная с числа N и заканчивая числом M
Подсказска:
i это текущие значения
N до M значит от начала до конца , начальное число N, концовое M
mod использоватсья надо, поомгите пожалуйста, отблагодарю


Информатика (42 баллов) | 47 просмотров
Дан 1 ответ
0 голосов

program z1;
uses crt;
var n,m,i:integer;
begin
repeat
writeln('Введите числа');
readln(n,m);
until nfor i:=n to m do
begin
if i mod 2 =0 then write(i:4);
end;
end.

(102 баллов)