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

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

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

End.