Составить программу которая подсчитывает количество трехзначных чисел кратных 7
139
ОТВЕТЫ
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.
118
Отв. дан
Для написания вопросов и ответов необходимо зарегистрироваться на сайте
Другие вопросы в разделе - Информатика
Felonis
Что такое формальный язык ? ...
2019-01-22 03:31:44
Феофилакт
Когда в школе объявили день вежливости, каждый мальчик из ...
2019-01-22 03:25:30
Аскольд
Подскажите пожалуйста 5,6,7,8 ...
2019-01-22 03:24:14
Радиевич
Алгоритм вычисления значения функции F(n), где n – натуральное ...
2019-01-22 03:23:15