Войти Регистрация Спроси ai-bota

Найдите сумму первых 10 чисел (1 2 3 4 5 6 7 8 9 10) на языке паскаль

Ответ:

ДаниилВолоснов

03.08.2020 10:23

Var
a: array[1..10] of integer;
k; integer;
Begin
For k:=1 to 10 do begin
Read(a[k]);
s:=s+a[k];
end;
Writeln(s)
Readln;
end.

0,0(0 оценок)

Популярные вопросы: Информатика

Toichievakumis2

14.01.2021 11:05

При интернет соединении с максимальной скоростью скачивания 512 килобит/с аудио-файл размером 15360 килобайт будет в лучшем случае скачиваться...

nastyakotika

24.03.2021 06:33

Пользователь петров имеет свой почтовый электронный адрес. известно, что его почтовый сервер расположен в россии, а почтовый адрес содержит четыре из представленных элементов,...

loko177

24.03.2021 06:33

Увеличить на 4 все элементы в первой половине массива a (считать, что в массиве чётное число элементов). размер массива и значения элементов массива – произвольные....

aellazhumashovа

07.10.2022 09:49

Снекоторого языка словосочетание лиро касс переводится как красный помидор, дум касс дан означает большой красный трамвай ксер дан -большой конь. создайте словарь для данного...

shavkatbronduk1

03.05.2022 10:13

Подойдет ли microsoft word 2013 на windows 10?...

Ясминка2006

15.03.2022 07:19

Дано натуральное трехзначное число n. составьте программу, выводящую четырехзначное число, полученное приписыванием цифры разряда единиц исходного числа к нему же слева (в разряд...

3848390

01.07.2021 14:00

1) заполнить массив a, состоящий из n (1 =n =10000) элементов случайными целыми числами в диапазоне [-10^9..+10^9]. 2) отсортировать массив a в порядке неубывания элементов....

krivobokova45

08.10.2021 14:40

Кластер на тему Белогрудка...

Bonga1337

19.05.2021 12:36

б) определите конечный пункт путешествия, если исследователи начали свой путь из северных берегов Австралии...

Maaaaaria122

20.07.2021 18:49

С какими целями была создана кириллица? ...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку