Вывести на экран в строчку все числа третьей сотни,оканчивающиеся на семь (в паскаль)
Вывести на экран в строчку все числа третьей сотни,оканчивающиеся на семь (в паскаль)
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
program ThirdHundredNumbersEndingInSeven;
var
i, count: integer;
begin
count := 0;
for i := 200 to 299 do
begin
if i mod 10 = 7 then
begin
write(i, ' ');
count := count + 1;
end;
end;
writeln;
writeln('Total numbers ending in seven in the third hundred: ', count);
end.