Напечатайте все целые числа от A до B, заканчиваются цифрой 5 или цифрой 0.

Question

Информатика

Евангелина

21 февраля, 03:31

Напечатайте все целые числа от A до B, заканчиваются цифрой 5 или цифрой 0.

+2

Ответы (1)

Знаете ответ на вопрос?

Максимиан · Answer 1

Program prog;

uses crt;

var i, a, b : integer;

begin

clrscr;

write ('A = ') ;

readln (a) ;

write ('B = ') ;

readln (b) ;

for i:=A to B do

if (i mod 5) = 0 then

write (i,' ') ;

end.