Новые сообщения · Правила  
  • Страница 1 из 1
  • 1
Модератор форума: Berestovskiy  
массив
ошибка при компиляции, помогите пожалуйста. 
1. Составить программу наязыке Pascal для решения следующей задачи: данодномерный массив размерности n. Найти среднее арифметическое элементов массива FFFFFFFF0001000014000F00220435043A04410442043E0432043E0435041F043E043B0435043700370000000000000000000000000000000D00420435043A04410442042000 32043E043F0440043E044104300400000000000000000000 вот что у меня получилось:
programzadacha;var a:array [1..100] of real;n,i,k:integer;sum, sr:real;beginwriteln ('введите элемент массива');readln (n);for i:=1 ton doreadln(a);sum:=0;sr:=0;k:=0;for i:=1 ton dok:=k+1;sum:=sum+1;sr:=sum/k;writeln ('sr:=',sr:6:2);end.
1 | Автор: Натуличка | 2013-05-24, 15:07   |  Репутация: [ + 0 ]
1 | Автор: Натуличка | 2013-05-24, 15:07   |  Репутация: [ + 0 ]
Нормально код можешь написать?

Нужна помощь? Сюда: vkontakte.ru/berestovskiy
2 | Автор: Berestovskiy | 2013-05-24, 18:44   |  Репутация: [ + 211 ]
  • Страница 1 из 1
  • 1
Поиск: