program vuz;
var a,b,c :integer;
begin
writeln('Сколько набрал выпускник?');
readln(a);
if a<135 then writeln('Выпускник не поступит в ВУЗ') else writeln('Выпускник поступит в ВУЗ');
end.
Объяснение:
program vuz;
var a,b,c :integer;
begin
writeln('Сколько набрал выпускник?');
readln(a);
if a<135 then writeln('Выпускник не поступит в ВУЗ') else writeln('Выпускник поступит в ВУЗ');
end.
Объяснение: