Gavinrandis
4 год назад
Напишите,пожалуйста,программу.Задание:Найдите все целые трехзначные числа которые делятся на 11 и 3. Пожалуйста посчитайте!!!
ОТВЕТЫ
Izmail
Oct 24, 2020
program z1;
var x:integer;
begin
for x:=100 to 999 do
if (x mod 11=0)and(x mod 3=0) then
write (x,' ');
end.
var x:integer;
begin
for x:=100 to 999 do
if (x mod 11=0)and(x mod 3=0) then
write (x,' ');
end.
416
Смежные вопросы:
