Составить программу проверяющую что введённое число делится без остатка на 3 ( паскаль)

vauguq vauguq    1   25.09.2019 12:20    3

Ответы
SkriN123 SkriN123  08.10.2020 18:22
Program z1;
 Var a: integer;
 Begin
 writeln('Введите число:');
 readln(a);  
if (a mod 3)=0 then 
 writeln('Число кратно 3.') 
else 
writeln('Число не кратно 3.');
 end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика