Вычислить Y=A+B+C , применив: а) — процедуру ввода данных; — процедуру вычисления Y; — процедуру вывода результата; — глобальные переменные;
PASCAL ABC

Вопрос школьника по предмету Информатика

Вычислить Y=A+B+C , применив: а) — процедуру ввода данных; — процедуру вычисления Y; — процедуру вывода результата; — глобальные переменные;
PASCAL ABC

Ответ учителя по предмету Информатика

var a,b,c,y:integer; // глобальные переменные

begin // начало программы

write(‘A, B, C: ‘); // вывод подсказки перед вводом данных

readln(a,b,c);  // ввод данных

y:=a+b+c;  / вычисление Y

writeln(‘Y = ‘,y); // вывод результата

end. // конец программы

Пример:

A, B, C: 8 3 5

Y = 16