Помогите решить задачу на Паскале - Помощь студентам

TyCkaH4uK · 14.04.2020, 15:41

Дан массив А(13), в котором элементы заданы случайным образом в
диапазоне от 5 до 80. Найти сумму элементов больших 17, но меньших 65.

Только можно попроще, а то учитель подумает я списал

digitalis · 14.04.2020, 22:28

Код:

   sum := 0 ;
   for i := 1 to 13 do
      if (A[i]>17) and (A[i]<65)  then sum := sum + A[i] ;
    writeln (sum) ;

А учитель - лох и этот форум не читает ?
А заполнить массив - сам, почитав это: https://pas1.ru/random

14.04.2020, 15:41	#1
TyCkaH4uK Новичок Джуниор Регистрация: 14.04.2020 Сообщений: 1	Помогите решить задачу на Паскале Дан массив А(13), в котором элементы заданы случайным образом в диапазоне от 5 до 80. Найти сумму элементов больших 17, но меньших 65. Только можно попроще, а то учитель подумает я списал

14.04.2020, 22:28	#2
digitalis Старожил Регистрация: 04.02.2011 Сообщений: 4,559	Код: `sum := 0 ; for i := 1 to 13 do if (A[i]>17) and (A[i]<65) then sum := sum + A[i] ; writeln (sum) ;` А учитель - лох и этот форум не читает ? А заполнить массив - сам, почитав это: https://pas1.ru/random Последний раз редактировалось digitalis; 14.04.2020 в 22:31.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Помогите решить задачу на паскале	Bauyrzhan	Помощь студентам	2	30.05.2009 10:20
Помогите решить задачу в паскале	P@niSheR	Помощь студентам	2	08.12.2008 18:48