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

Question

Информатика

Эраст

13 октября, 12:17

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

+5

Ответы (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.