Предмет: Информатика,
автор: hazar10r
Напишите программный код. Вывести на экран все 3-х значные числа, делящиеся на 3. (Вывод чисел в строку) ( паскаль)
30баллов
Ответы
Автор ответа:
1
Ответ:
var i,d: integer;
begin
for i:=100 to 999 do
begin
d:=i mod 3;
if (d=0) then
write(i,' ');
end;
end.
kriskamai2002:
p.s. до этого программа не правильно работала, немного изменила
щас работает?
да
спасибо большое
Автор ответа:
1
var
i: integer;
begin
for i:=100 to 999 do
if (i mod 3 = 0) then
write(i,' ');
end.
Интересные вопросы
Предмет: Алгебра,
автор: nikita62rus
Предмет: Геометрия,
автор: мариякукарача
Предмет: Русский язык,
автор: antonrogozin9
Предмет: Математика,
автор: Membrey
Предмет: Алгебра,
автор: vavrik50