Задание:
Cоздать программу на Турбо Паскаль, определяющую сумму первых 5 элементов одномерного массива. Ребят очень срочно! У меняэкзамен!
Решение:
vara: array [1… 5] of integer; s: integer; {сумма}i: integer; {счетчик}begins: =0; for i: =1 to 5 dobeginwriteln ('введите значение элемента',',i,': '); readln (a[i]); s: =s+a[i]; end; for i: =1 to 5 dowrite (a[i]: 4); writeln ('сумма равна',s); readln; end. Я не уверен)
Знаете другой ответ?