Регистрация
muxametzhanovad
01.05.2022 05:35
Информатика
Есть ответ 👍

Программа на Pascal. Выдаёт ошибку в стоке исправить var

a,b,c,s,e:integer;

d:real;

begin

readln:(a,b,c);

s:=a+b+c;

d:=(a+b+c)/3;

e:=a*b*c;

writeln ('Сумма чисел равна ', s);

writeln ('Произведение рано ', e);

writeln ('Среднее арифметическое равно ', d);

end.

152
376
Посмотреть ответы 1

Ответы на вопрос:

uzil1565
uzil1565
4,7(90 оценок)
(овал)начало (параллелограмм)x (прямоугольник) x=x/5 (параллелограмм)x (овал)конец

Популярно: Информатика