Написать программу на паскале,по которой можно было узнать делится ли число на 5 без остатка и на 4 без остатка

224

438

Посмотреть ответы 2

Ответы на вопрос:

Dzdze

Информатика

4,5(43 оценок)

program ex; uses crt; var n : integer; begin clrscr; write('n='); readln(n); if (n mod 5)=0 then writeln (n,' delitsya na 5 bez ostatka') else writeln (n,' ne delitsya na 5 bez ostatka'); if (n mod 4)=0 then writeln (n,' delitsya na 4 bez ostatka') else writeln (n,' ne delitsya na 4 bez ostatka'); end.