Помогите Паскаль
1. Дано целое число. Верно ли, что оно делится на 5 и на 7?
2. Даны два целых числа. Верно ли, что они заканчиваются на одну и ту же цифру?
3. Определить, пройдет ли кирпич с ребрами a, b, c в прямоугольное отверстие со сторонами x, y.
4. Дано квадратное уравнение ax2+bx+c=0. Найти корни уравнения.

Program z1;
var n:integer;
begin
writeln(vvedite 4islo-);
readln(n);
if (n mod 7=0) and (n mod 5=0) then
writeln(verno)
else
writeln(neverno);
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.