Question

Не могу понять, где тут ошибка ( Программа Pascal ). Помогите, пожалуйста:
Program delenie_na_4;
Var a: integer;
Begin
write ('4');
Read (a);
If 16 mod 4=0 then
write ('число'; 16, 'делится на 4')
Else
write ('число',16, 'не делится на 4')
End

Answer 1

Var a: integer;
Begin
write ('Введите число: ');
Readln (a);
If a mod 4=0 then writeln ('число ', a, ' делится на 4')
Else writeln ('число ',a, ' не делится на 4');
End.

Answer 2

Деление чего на 4? 16 или переменной a?

Answer 3

Проверять делимость 16 на 4 бессмысленно, поэтому а на 4

Answer 4

Да у нас в школе презентация была по такой проге

Answer 5

Там название проги вот так выглядело

Answer 6

очепятался. исправил.