Пример программы с использованием одномерного массива:
Var a:Array [ 1..10] of real;
x: real;
i:integer;
Begin
For i:=1to5do
a[i]:=5;
For i:=5to10do
a[i]:=10;
x:=a[4] + a[6];
x:=x/a[3];
For i:=1to10do
writeln (a[i]);
writeln (x);
end.
Данная программа является только образцом, который не имеет никакого смысла. Эта программа выводит сначала 5 пятёрок, затем 5 десяток, после одну тройку.
4. Выполнить задание
Задание
Набрать вышеописанный пример программы. Отладить. Изменить программу так, чтобы программа выводила сначала 5 единиц, затем 5 двоек, после найти сумму первой и последней ячеек массива.
289
341
Ответы на вопрос:
На сегодняшний день обойная индустрия предлагает нам настолько большой выбор обоев, что разобраться во всем этом разнообразии представляется настоящей проблемой.
Далее мы расскажем о главных преимуществах и недостатках обоев, виды которых можно найти в продаже.
Популярно: Другие предметы
-
Maxutka00702.02.2021 03:41
-
derment130.03.2022 07:39
-
ммрк05.09.2022 14:23
-
ruslan42804.06.2023 01:49
-
Kikiro25.10.2022 17:21
-
arykovevgeny19.09.2020 10:23
-
369Камила129.01.2020 22:02
-
Frikkkkkkkk04.07.2021 01:06
-
Sweet57223.05.2020 12:31
-
какахааа28.05.2023 16:28