Ответы на вопрос:
Последовательный,параллельный,строящийся,сраанительный,психологический
Var x, i: integer; b: array[1..10] of real; begin for i: =1 to 10 do begin write('b[', i, '] = '); readln(b[i]); end; write('индекс: '); readln(x); if (x> 0) and (x< 11) then write('b[', x, '] = ', b[x]) else write('нет значений для данного индекса' ) end.
Популярно: Информатика
-
AnnaFruzanna26.04.2020 00:48
-
adeka08825.06.2020 07:07
-
расим2822.02.2023 12:18
-
haylayjonesty02.03.2022 12:04
-
Аняняняняняняняяня01.01.2022 03:00
-
ttlekzhan09.06.2022 02:19
-
sevostyanova200223.10.2022 17:03
-
MrHard128.02.2020 00:37
-
petechkaPetrovPetor31.08.2021 11:33
-
Matvey174578922.09.2022 21:15