Написать в паскале используя циклы:Среди всех натуральных трехзначных чисел найти и вывести на экран только кратные пяти и вычислить их количество.
Написать в паскале используя циклы:
Среди всех натуральных трехзначных чисел найти и вывести на экран только кратные пяти и вычислить их количество.
Гость
Ответ(ы) на вопрос:
Гостьvar x.k:integer;
BEGIN
k:=0;
for x:=100 to 999 do
if x mod 5 = 0 then begin writeln(x);k:=k+1; end;
writeln('k=',k);
end.
Не нашли ответ?
Похожие вопросы