|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
08.12.2008, 19:06 | #1 |
Пользователь
Регистрация: 08.12.2008
Сообщений: 15
|
Сумма элементов от А до Амин
Дан массив А1..А20. Вычислите в нем сумму элементов от А1 до Амин.
|
08.12.2008, 19:15 | #2 |
Участник клуба
Регистрация: 10.11.2008
Сообщений: 1,502
|
uses crt;
var a:array[1..20] of integer; i,min:integer; sum:real; begin clrscr; randomize; for i:=1 to 20 do begin a[i]:=random(100); write(a[i]:3); end; writeln; min:=1; for i:=2 to 20 do if a[min]>a[i] then min:=i; sum:=0; for i:=1 to min-1 do sum:=sum+a[i]; writeln(sum:4:1); end.
Нормальное состояние техники - нерабочее, все остальное частный случай.
|
08.12.2008, 19:52 | #3 |
Пользователь
Регистрация: 08.12.2008
Сообщений: 15
|
спасибо!!!
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Матрица. Сумма элементов главной диагонали | RECREATOR | Помощь студентам | 13 | 11.05.2011 22:12 |
Дан массив из N элементов (чисел),определить количество элементов кратных 3. | Woha | Общие вопросы C/C++ | 2 | 08.12.2008 13:12 |
В прямоугольной матрице переставить столбцы так, чтобы сумма элементов столбца росла от первого столбца | Aleo13 | Помощь студентам | 5 | 15.10.2008 18:34 |
количество элементов матрицы, больших среднего арифмитического всех её элементов | finch | Помощь студентам | 3 | 27.08.2007 15:48 |
Сумма элементов массива, больших А | Sultan | Помощь студентам | 1 | 21.04.2007 11:13 |