70

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

26 марта 2023

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

категория: информатика



65

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.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...