Определить кратно ли число 3 в pascal, если не - вопрос №6976139310 от hanum27082005 24.05.2022 06:26

Question

Информатика: Определить кратно ли число 3 в pascal, если не кратно то умножить на 10, если кратно то разделить на 3

hanum27082005 · Answer

Program n1;var a: integer;beginreadln(a);if(a mod 3=0) then writeln(round(a/3))else writeln(a*10); end....