Предмет: Информатика,
автор: murzilkaaa
найти все трехзначные числа, у которых сумма крайних цифр. равна 5 , а само число делятся на 3(Pascal)
Ответы
Автор ответа:
0
var i:integer;
begin
for i:=100 to 999 do
if ( i mod 100 div 10+i mod 10=5 ) and (i mod 3 = 0) then writeln(i);
end.
begin
for i:=100 to 999 do
if ( i mod 100 div 10+i mod 10=5 ) and (i mod 3 = 0) then writeln(i);
end.
Похожие вопросы
Предмет: История,
автор: lokhyash
Предмет: Другие предметы,
автор: valeriarudina638
Предмет: Математика,
автор: Аноним
Предмет: Математика,
автор: deilik
Предмет: Литература,
автор: Nadllaa