Напишите программный код. Вывести на экран все 3-х значные числа, делящиеся на 3. (Вывод чисел в строку) ( паскаль)
30баллов
30баллов
More Questions From This User See All
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
var i,d: integer;
begin
for i:=100 to 999 do
begin
d:=i mod 3;
if (d=0) then
write(i,' ');
end;
end.
var
i: integer;
begin
for i:=100 to 999 do
if (i mod 3 = 0) then
write(i,' ');
end.