Задать одномерный массив 20 целых чисел из [-5 1] и вывести его на экран найти сумму всех элементов массива
simpolita
1
10.03.2019 00:50
2
Другие вопросы по теме Информатика
данил1956
03.03.2021 07:56
vaniaslavioglo
15.07.2019 16:40
nastiarabadj
15.07.2019 16:50
маринэджан
15.07.2019 16:50
winni2221
15.07.2019 16:50
Clime
15.07.2019 16:50
amira061
15.07.2019 16:50
casha0032
15.07.2019 16:50
School957
15.07.2019 16:50
Популярные вопросы
- Составьте таблицы истинности высказываний: а) (p∧(q∨¬r))⇒q; б) (p⇒q)⇔(¬q⇒¬p)...
1 - На острове живут два племени – аборигены и пришельцы. известно, что...
2 - Как правильно: нашу планету населяет (или населяют) около двух миллионов...
1 - Какое жилкование листьев у жимолости, черноплодки,крыжовника, айвы...
2 - Расстояние между пунктами а и в равно 40. из пункта в выехал велосипедист...
3 - Найдите значение выражения двумя а)обратив все дроби в десятичные...
1 - Решить первый рабочий ремонтирует 5 моторов за то же время,которое...
3 - Разбор слова по составу : сиденьями...
1 - Окружности с центрами в точках j и i пересекаются в точках a и b,причем...
2 - 1)ab — касательная к окружности, ac и ad — хорды, причем ac и ab перпендикулярны....
1
unit math;
program chisla;
var
a: array[1..20] of intteger;
i,s:integer;
Begin
s:=0;
for i:=1 to 20 do begin
a[i]:=randomRange(-5,1);
write(' ',a[i]);
s:=s+a[i];
end;
readln;
writeln('Сумма элементов массива= ',s);
End.