1) Написать программу, проверяющую, удовлетворяет ли введённое число следующему условию: больше 7 или делится на 3. Паскаль

program z;

var

i : integer;

begin

Writeln('Введите число'); Readln(i);

if i mod 3 = 0

then

Writeln('Число делится на 3')

else

Writeln('Число не делится на 3');

readln;

end.

Объяснение:

я не знаю это правильно или нет