Составить программу в паскалес клавиатуы вводятся 5 чисел

Question

Составить программу в паскалес клавиатуы вводятся 5 чисел. После ввода каждого числа выводим среднее арифметическое введенной частиP.S. Пять чисел нужно выразить через одну переменную

Answer 1

64

mixey

21 февраля 2023

Var pr,sum,n: real; i: integer; Beginwrite ('Вводите числа: '); for i: =1 to 5 do begin readln (n); sum: =sum+n; end; pr: =sum/5; writeln ('среднее арифметическое равно: ',pr); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: