1. Информатика
  2. Склавиатуры ввести массив

Склавиатуры ввести массив а (б). найти сумму всех элементов массива. вывести ее на экран, и массив опять

aninagalamova aninagalamova    1   31.03.2019 10:40    0

Ответы
12345578824828 12345578824828  27.05.2020 21:48

var

 a:array [1..1000000] of longint;

N,S,i:longint;

begin

 Readln(N);

 For i:=1 to N do begin Read(a[i]); S:=S+a[i]; end; Readln;

Writeln(S);

 For i:=1 to N do Write(a[i],' ');

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
XyLiGaN4iK228 XyLiGaN4iK228  21.04.2021 00:28
1. Використовуючи встановлене IDLE (Python) напишіть програму для обчислення свого віку (роки) в секундах. 2. В інтерактивному режимі використайте Python для виведення...
maksimlimanskiy maksimlimanskiy  21.04.2021 00:31
1.Масив А[1..5] заповнено числами 3, 8, 5, 7, 6. Виконайте дії з елементами масиву: a) For i:=1 to 5 do A[i] := -A[i];6) For i:=1 to 5 doIf A[i] mod 3 = 0 Then A[i] :=...
Valik123211 Valik123211  21.04.2021 00:32
Дано масив А[15]. Запишіть оператори для реалізації завдань: а) ввести з клавіатури значення елементів масиву;б) знайти добуток елементів масиву;в) знайти мінімальний...
viktoriakruminaВика viktoriakruminaВика  21.04.2021 00:38
Отправить видео и показать что оно работает програма Lazarus...
ВіКтОрІя0901 ВіКтОрІя0901  21.04.2021 00:41
В кодировке Unicode на каждый символ отводится два байта. Определи информационный объём текста из 35 символов в этой кодировке ​...
hamestik hamestik  18.12.2019 08:12
Вцветовой модели rgb для кодирования одного пикселя используется 3 байта. фотографию размером 2126×2835 пикселей сохранили в виде несжатого файла с использованием rgb-кодирования....
мари420 мари420  18.12.2019 08:18
Ii тограммирование»вариант1. в программе описан одномерный целочисленный массив асиплексами от 0 до 10ниже представлен фрагмент этой программы, записанный на языке pascal,...
333399 333399  18.12.2019 08:23
Составить блок-схему алгоритма и программу на языке с++ для вычисления значений функции у=f(x) в точках от до с шагом с использованием цикла for: y=sin(ax+e^x) /√ах^2+3.x1=3;...
lazarenko2 lazarenko2  20.01.2020 06:25
Акакая относительная особенность внешнего интерфейса и преимущества интерфейса ? заранее )...
alinakuzmich324 alinakuzmich324  20.01.2020 05:22
Иванов виталя разработал программу krutayaprograma и распространяет ее с исходным кодом, но запрещает его изменение. к какой категории относится эта программа - свободное...

Популярные вопросы