Вывести все двузначные числа кратные 7.Pascal ABC

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

Вывести все двузначные числа кратные 7.
Pascal ABC


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

Program abc;
var a:integer;
begin
for a:=10 to 99 do
if a mod 7=0 then
writeln(a,' ');
end.

(2.7k баллов)