Anyaqwi
4 год назад
составить программу которая подсчитывает количество трехзначных чисел кратных 7
ОТВЕТЫ
Василка
Oct 24, 2020
var a: integer;
begin
a:=0;
for var i:=100 to 999 do
if (i mod 7=0) then
a:=a+1;
write(a);
end.
begin
a:=0;
for var i:=100 to 999 do
if (i mod 7=0) then
a:=a+1;
write(a);
end.
836
Смежные вопросы: