Написать алгоритм нахождения суммы трех чисел и нахождения квадрата

Question

Информатика

Эраст

10 декабря, 23:43

Написать алгоритм нахождения суммы трех чисел и нахождения квадрата

+1

Ответы (1)

Знаете ответ на вопрос?

Владислав · Answer 1

Program Program1;

var a, b, c, d:real;

begin writeln ('Введите число 1') ; readln (a) ; writeln ('Введите число 2') ; readln (b) ; writeln ('Введите число 3') ; readln (c) ; d:=a+b+c; writeln ('a+b+c=', d) ; end.