Дано n натуральных целых чисел, которые вводятся пользователем с клавиатуры. Составить программу, определяющую количество на¬туральных целых чисел, не превышающих 100 и крат¬ных 5.
More Questions From This User See All
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
Program p1;
var i,k:integer;
begin
k:=0;
for i:=1 to 100 do
begin
if (i mod 5 = 0) then k:=k+1;
end;
writeln (k);
end.