Задан одномерный массив датчиком случайных чисел состоящий из 10 элементов найти сумму первого и последнего элемента

Question

Кононыч

27 апреля, 18:49

+2

Ответы (1)

Знаете ответ?

Аделаида · Answer 1

Var

mas:array [1 ... 10] of integer;

i:integer;

begin

randomize;

for i:=1 to 10 do mas[i]:=random (100) ;

writeln (mas[1]+mas[10]) ;

end.