Помогите решить задачу, срочно надо |
Начальные контакты ТОЛЬКО через личку!!
Помогите решить задачу, срочно надо |
r_rock |
Сообщение
#1
|
Группа: Пользователи Сообщений: 1 Пол: Мужской Репутация: 0 |
Помогите решить задачу, срочно надо:дан файл f , компоненты которого являюся действительными числами найти сумму компонентов f.
|
MAXXX |
Сообщение
#2
|
В поисках Занаду Группа: Пользователи Сообщений: 17 Пол: Мужской Реальное имя: Андрей Максай Репутация: 0 |
Естественно, нельзя за такое брать деньги!
Вот примерный код: Код Var r,d:Real; begin Assign(input,'{имя файла}'); Reset(input); r:=0; While not eof do begin Read(d); r:=r+d; end; Close(input); Writeln(r); end. |
Текстовая версия | 15.05.2024 8:45 |