Создать массив из 20-ти случайных двух значных чисел.вычислить сумму элементов массива

1.program program1; vara: array [1..20] of integer; i,k: integer; beginrandomize; for i: =1 to 20 doa[i]: =random(101); k: =0; for i: =1 to 20 dobeginwrite(a[i],', '); k: =k+a[i]; end; writeln('сумма элементов массива: ',k); end.2.program program2; vara: array [1..20] of integer; i,k: integer; beginrandomize; for i: =1 to 20 doa[i]: =random(101); k: =0; for i: =1 to 20 dobeginwrite(a[i],', '); inc(k); end; writeln('количество элементов массива: ',k); end.

однажды я шел домой и увидел робота он себя странно вел толи танцевал или что-то еще было не понятно. но когда я прошел мимо его он пошел за мной и следил за мной и повторял за мной все движения меня это удевило мне стало весело когда я подхадил к дому какието злые дядьки стояли у моего подъезда мне было страшно идти туда однаму они говарили о чем то странном но немного постояв за углом дома я слышал о чем они говарят.

они говарили о своем плане ограбить банк и я понел что они ждут своего друга и отправяться осуществлять свой план. я понел что не успею вызвать полицию и телефона у меня не было с собой. я посмотрел на робота и он поаторял все мои движения и я понел что сам смогу взять всё в свои руки. я одел маску которую я купил в сагазине переключил глаза робота назад и встал взади него и шел вперед за бандитами и начал драться с ними, а они при этом хотели взломать банк но не смогли. теперь я с этим роботом каждую ночь выходим на улицу и боримся с преступностю.

(коммкс это рисунки и не котрые слова вставлены в рисунки я тебе сценарий придумал теперь ты нарисуй рисунки и вставляй предложения или слова такие как (буум,) незачто : d )

ответ:

объяснение:

2.

итерационные циклы

while, repeat - until

условие выполнения цикла может быть любым выражением, возвращающим тип boolean

шаг изменения любой

цикл с параметром

for

начальное и конечное значения - целые числа

шаг изменения параметра равно 1

количество итераций = [конечная граница] - [начальная граница] + 1

3.

цикл с предусловием  

while

минимальное количество итераций = 0 (случай, когда условие while не выполняется при первом проходе)

максимальное количество не ограничено

цикл с постусловием

repeat - until

минимальное количество итераций = 1 (условие выхода проверяется в конце цикла, хотя бы один раз цикл выполнится)

максимальное количество не ограничено