Home
О нас
Products
Services
Регистрация
Войти
Поиск
Benjamin
@Benjamin
August 2021
1
22
Report
Задание во вложении.
Please enter comments
Please enter your name.
Please enter the correct email address.
Agree to
terms of service
You must agree before submitting.
Send
Answers & Comments
NiGhtWolFs
Var a:array [1..5] of real;
i:integer;
c:real;
begin
c:=0;
for i:=1 to 5 do
begin
write ('Введите ',i,' число: ');
readln (a[i]);
c:=c+a[i];
end;
writeln ('Среднее арифметическое 5ти чисел = ',c/5);
end.
3 votes
Thanks 1
×
Report "Задание во вложении..."
Your name
Email
Reason
-Select Reason-
Pornographic
Defamatory
Illegal/Unlawful
Spam
Other Terms Of Service Violation
File a copyright complaint
Description
Helpful Links
О нас
Политика конфиденциальности
Правила и условия
Copyright
Контакты
Helpful Social
Get monthly updates
Submit
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
i:integer;
c:real;
begin
c:=0;
for i:=1 to 5 do
begin
write ('Введите ',i,' число: ');
readln (a[i]);
c:=c+a[i];
end;
writeln ('Среднее арифметическое 5ти чисел = ',c/5);
end.