Предмет: Информатика,
автор: feldchernol
помогите пожалуйста срочно
написать программу вывода всех чисел [1056..50689], которые делятся нацело на 3 и на 6, но не делится на 8,9 и 5
Ответы
Автор ответа:
1
Ответ:
var i:longint;
begin
for i:=1056 to 50689 do begin
if (i mod 3 = 0) and (i mod 6 = 0) and (i mod 8 <> 0) and (i mod 9 <> 0) and (i mod 5 <> 0) then write(i,' ');
end;
end.
justDavid:
о, классно! Пингвин старший помог малышке-Пингвинчику! Ожидать новый трогательный мульт в стиле Король лев?
ахаххах :)
Интересные вопросы
Предмет: Русский язык,
автор: Antomas234
Предмет: Математика,
автор: 79172932261
Предмет: Математика,
автор: da428235
Предмет: Математика,
автор: basova1985
Предмет: Математика,
автор: PanVirEgor1020