Ввести с клавиатуры три целых числа, отыскать их сумму, произведение и

Ввести с клавиатуры три целых числа, найти их сумму, творенье и среднее арифметическое в pascal ABC
Пример:
Введите три целых числа :
5 7 8
5+7+8=20
5*7*8=280
(5+7+8)/3=6,667

Задать свой вопрос
1 ответ
Vara:real;b:real;c:real;d1:real;d2:real;d3:real;
Beginwriteln ('Введите числа');readln (a);readln (b);readln (c);d1:= a+b+c;d2:= a*b*c;d3:= (a+b+c)/3;writeln ('Сумма =',d1,',творенье =',d2,', а среднее арифметическое =',d3,'')end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт