Дано натуральное число. Определить, является ли оно составным. СОСТАВИТЬ…

Question

53

Дано натуральное число. Определить, является ли оно составным. СОСТАВИТЬ ПРОГРАММУ В ПАСКАЛЕ! Заранееспасибо.

в избранное ссылка

Знаете ответ?

astana · Accepted Answer

58

astana

08 марта 2023

Var a; beginreadln (a); if (a mod 2=0) or (a mod 3=0) or (a mod 5=0) then writeln (Chislo sostavnoe) elsewriteln (Chislo prostoe); readln; end.

комментировать

в избранное ссылка отблагодарить