Информатика, опубликовано 2018-08-22 23:21:13 by Гость

Вывести на экран все четные числп от n до m ,в поскале

Ответ оставил Гость

Var   n, m, i: integer; 
begin  
Readln(n);

Readln(m);

for i:=n to m do  
   if i mod 2 = 0 then  
begin
   
write(i, );   
 
readln; 
 
end;
end.

Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.

Форма вопроса доступна на полной версии этой страницы.