tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составить программу нахождения
Составить программу нахождения суммы элементов массива, состоящую из 10 чисел. язык pascal
sergey1234567891011
1 22.08.2019 17:30
1
Ответы
valenok18XD
05.10.2020 13:06
Var m:array [1..10] of integer;
I,s:integer;
Begin
S:=0;
For i:=1 to 10 do
Read(m[i]);
For i:=1 to 10 do
S:=s+m[i];
Write(s);
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
nastyshanastia1
24.06.2019 09:30
Pascal напишите программу, которая в последовательности натуральных чисел находит количество отрицательных чисел, кратных 10. программа получает на вход натуральные числа, количество...
дитус
24.06.2019 09:30
Pascal напишите программу: дана последовательность из n элементов. найти количество двузначных чисел, в которых одна и только одна из цифр 3ка....
malia1011
24.06.2019 09:30
Исправьте ошибки в program partiii; var n, numparties, i, j, t: integer; count: array[1..10] of integer; s: string[50]; names: array[1..10] of string; begin numparties: =0; readln(n);...
sadpoli
24.06.2019 09:30
1. текст закодирован в системе кодировки unicode. зная, что в тексте 144 символа, вычислите его объем a) 144 бит b)144 байт c)18 байт d)288 байт 2.сколько места займет пословица...
Жак104
24.06.2019 09:30
Паскаль - массивы. написать программу, которая считает среднее число шагов в двоичном поиске для массива из 32 элементов в интервале [0,100]. для поиска использовать 1000 случайных...
Nаstуа23
24.06.2019 09:30
Напишите программу, которая выводит на экран n (задается константой) случайных букв латинского алфавита в виде пары: заглавная буква, строчная буква. например, при n = 6 могут быть...
mhjkglckktcfcmjkfg
14.05.2020 14:49
РЕБЯТ МЕНЯ! 1. Какая ошибка допущена в записи оператора. Запишите правильный ответ. IF 00 THEN A:=A *A; B:=SQRT (B); Составьте блок-схему, соответствующую фрагменту программы. 2....
SkriN123
12.08.2019 07:10
Какие правила надо соблюдать при составлении таблицы?...
romagani15
12.08.2019 07:10
Написать программу вычисления длины окружности, площади круга и объема шара одного и того же заданного радиуса. на python...
Levix322
17.12.2019 18:15
Кумир.чертежник.нужен отчет (3 пункта) по уже решенной составьте программу рисования ромба с вершинами, лежащими на осях координат.координаты двух вершин (-5; 0) и (0; 18). программа:...
Популярные вопросы
Знайти його площу, якщо медіана третьої сторони дорівнює 2...
2
Складіть діалог на тему Однокласники діляться враженнями після перегляду фільму...
3
Квадрат 8×8 разрезали по линиям клеток на части одинакового периметра. Какое наибольшее...
2
Решить уравнение/розв язати рівняння ів...
3
Заведіть подібні доданки у виразі 1) 16а-9а 2) 3b+12b-16b 3) 15c-12+5c 4)15x-8x-12x...
1
В гидравлическом прессе на малый поршень площадью 10 см2 действует сила 100H.какая...
1
9. (1 б) Поясніть процес проходження струму в електролітах....
3
Знайдіть площу квадрата, периметр якого дорівнює 64 см...
2
Складіть молекулярнеі рівняння реакції обміну, яке відповідає йонномолекулярному...
2
19. Африканцы изготовляли различные изделия из: 4) глины; 1) дерева; 2) бронзы;...
1
I,s:integer;
Begin
S:=0;
For i:=1 to 10 do
Read(m[i]);
For i:=1 to 10 do
S:=s+m[i];
Write(s);
End.