|
Компьютерный хотите поспорить, что же круче: Intel или AMD? ....или обсудить новый софт? ....милости просим
|
|
Опции темы |
24-11-2006, 01:18 AM | #1 |
[Twit]
Регистрация: Nov 2006
Сообщения: 11
|
Задача для турбо паскаля
Задача для турбо паскаля
Ввести последовательность из N дробных чисел и найти их среднее арифметическое. ...просто именно цикл повторений, которым здесь нужно пользоваться, я плохо понял... Кто может решите плз |
24-11-2006, 02:17 AM | #2 |
С перцем;)
V.I.P. User
Регистрация: Nov 2005
Адрес: Moscow
Сообщения: 1,532
|
Все приводишь к одному знаменателю, складываешь, делишь на N, выделяешь целую часть и приписываешь дробную оставшуюся
Листинг писать впадлу)
__________________
м а ...wars are replaced,fighters remain... ................i ................r ................s ................t ._-=Бесит албанский=-_. |
24-11-2006, 10:52 AM | #3 | |
nothing else matters
|
Цитата:
sum:=0; For i:=1 to n do Begin sum:=sum+a[i]; End; sred:=sum/n; за точность кода не ручаюсь, Паскаль последний раз открывал 6 лет назад но смысл такой З.Ы. подразумевается что последовательность цифр задана массивом. |
|