Question

Напишите программу на языке Паскаль
​

Answer 1

Ответ:

program h;

uses crt;

var a, b, c: Integer;

begin

ReadLn(a, b, c);

if a+b+c>=200 then WriteLn('Выходит')

else WriteLn('Не выходит');

end.

Объяснение:

Первая строка: "h" можно заменить - это название программы

var - объявление переменных, Integer - целочисленные

readln - ввод трёх чисел

writeln - вывод ответа