Спиши текст, вставляя пропущенные буквы. Найди и подчеркни местоимения-прилагательные и местоимения-числительные.
110
337
Ответы на вопрос:
Данные |
Результат |
|
N=5 |
A=(3, 5, -2, 6, 3) |
S=15.0 |
Исполнение алгоритма
i |
S |
0 |
|
1 |
0 + a1 = 0+3 = 5 |
2 |
a1 + a2 = 3+5 = 8 |
3 |
a1+a2+a3 = 8-2 = 6 |
4 |
a1+a2+a3+a4 = 6+6 = 12 |
5 |
a1+a2+a3+a4+a5 = 12+3=15 |
Блок-схема
Turbo Pascal
Program Summa;
Uses Crt;
Type Mas = Array [1..20] of Real;
Var A : Mas;
i, N : Integer;
S : Real;
BEGIN
ClrScr; {очистка экрана }
Write('Введите N = ');
ReadLn(N); {ввод значения N}
For i := 1 to N dо {цикл по элементам массива}
begin
Write('A [ ', i , ' ] = ');
ReadLn(A[i]) {ввод элементов массива}
end;
S := 0; {присваивание начального значения}
For i := 1 to N do S := S+A[i]; {суммирование}
WriteLn;
WriteLn('Сумма равна ', S : 5 : 1);
ReadLn
END.
Популярно: Другие предметы
-
veralyagonova25.07.2020 18:55
-
pokintokin05.03.2022 09:12
-
aziko200208.03.2021 09:38
-
69fff96fff6902.06.2021 00:41
-
джемре08.11.2021 09:58
-
ирбиз15.09.2021 02:56
-
Ариана14516.09.2020 18:44
-
SvetaMatyukhina14.12.2020 13:35
-
mariapopova7709.03.2021 22:22
-
АндрееваДаша31.03.2022 07:30