Помогите составить программу ,позволяющую найти произведение всех 3ехзначных натуральных чисел,каждое из которых при делении на 7 дает остаток 3.Ну,или подправьте ту прогу,что я составила,а то что-то у меня она неправильная.
More Questions From This User See All
Answers & Comments
begin
a:=1;
for i = 100 to 999 do
begin
if (i mod 3)=7 then
a:=a*i;
end;
writeln (a);
end.
тип того