Ответы на вопрос:
1. var a: array [1..100] of integer; i,n: integer; begin read(n); {количество эл. массива} read (a[1], a[2]); for i: =3 to n do a[i]: =a[i-1]+a[i-2]; for i: =1 to n do write (a[i],' ' ); end.2.const m=6; n=3; var a: array [1..100,1..100] of integer; i,j: integer; begin for i: =1 to m do read (a[i,1]); for i: =1 to m do begin j: =1; a[i,j+1]: = sqr(a[i,j]); a[i,j+2]: = a[i,j] div a[i,j+1]; {это условие мне не совсем понятно} end; for i: =1 to m do begin for j: =1 to n do write (a[i,j]: 3); writeln; end; end.
Популярно: Информатика
-
blazer612.03.2021 10:06
-
Vikaa111114.01.2023 17:45
-
kseniafomina9926.07.2021 15:33
-
Milky040524.03.2021 20:05
-
osapkina09.06.2020 07:40
-
dilnaz6127.02.2022 20:09
-
KNEZIX10.12.2020 08:39
-
Masha050107.08.2020 15:27
-
Кошка20051126.02.2021 00:23
-
dimonshegolev31.07.2020 23:08