Категория - Информатика Автор - AppleThe 10 лет назад даны натуральные числа от 20 до 50. напечатать те из них, которые делятся на 3, но не делятся на 5. Программа на Pascal
Категория - Информатика Автор - AppleThe 10 лет назад даны натуральные числа от 20 до 50. напечатать те из них, которые делятся на 3, но не делятся на 5. Программа на Pascal
Ответ Автор - Mechael uses crt; var i:integer;begin For i:=20 to 50 do If (i mod 3=0) and (i mod 5 <> 0) then writeln(i); end.