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

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

Ответ:

илья1974

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 оценок)

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

ellapopova05

06.04.2022 16:38

Правила записи арифметических выражений. Урок 1 Определи арифметические функции, результат Выполнения которых будет целым числом. Верных ответов: 2 5/2.0 5*2 round(34.567,2) abs(-25)...

arminqamalyan85

19.04.2021 10:13

2. Каким будет значение переменной x после завершения данного цикла? for x in range (100):...

vstef

24.02.2022 15:04

Информационный объём текста, подготовленного с компьютера, равен 20 Мб. 1символ весит 1 байт. Сколько символов содержит этот текст?...

мага092

11.08.2020 06:35

Дан двумерный массив. Определить: номер столбца, в котором расположен минимальный элемент третьей строки массива. Если элементов с минимальным значением в этой строке не- сколько,...

alina2007121034

18.12.2021 13:38

• Составить программу, которая будет менять все четные числа в списке (массиве) на 0 и нечетные числа на 1. • Организовать введение данных в список с цикла for i in range (n): (n...

Arinaiv1

04.09.2021 09:43

Abc дан одномерный массив а. отсортировать массив по убыванию, найти количество отрицательных элементов массива, стоящих на четных местах...

smiley505

03.03.2021 22:24

Назовите основные области применения компьютерной...

Aldhynbaavyl

20.02.2020 15:30

Это рофл быстрее только девочкам подарак...

fedorinovkirs

29.12.2022 03:16

От дайте нормальный ответ Задание 2. ответь письменно на вопросы1. Как связаны понятия «комическое» и «комедия»?2. Назовите основные признаки комедии....

Danchik2046

22.09.2020 03:34

83652567632577424*7864674347...

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

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