Задача 6 Урок 9.

var A, B, C: integer;
begin
writeln('Введите целые числа A, B, C: ');
readln(A, B, C);
if(B>17) and (A>17) and (C>7) then
writeln ('Да.')
else
writeln ('Нет.');

readln();
end.

vedro-compota's picture

исправить форматирование

_____________
матфак вгу и остальная классика =)