
Сергей
7 год назад
Составьте программу , которая выводит на экран все числа от 20 до 70 , оканчивающиеся на цифру 4
ОТВЕТЫ

Самуилович
Jul 10, 2019
Program n_1;
var i,a:integer;
begin
for i := 20 to 70 do begin
a := i mod 10;
if a = 4 then
writeln(i);
end
end.
var i,a:integer;
begin
for i := 20 to 70 do begin
a := i mod 10;
if a = 4 then
writeln(i);
end
end.
4
Смежные вопросы: