Ввести рост человека. Вывести на экран "высокий", если его рост превышает, 180 см и "не...

Если писать в паскале(Pascal ABC) то попробуй так:

Uses crt;
Var
a:real;
begin
readln(a);
if (a > 180) then
writeln ('Высокий')
else
writeln ('Не очень высокий);

End.

Ввести рост человека. Вывести ** экран "высокий", если его рост превышает, 180 см и "не...