Ответы на вопрос:
uses crt;
var a: array[1..8] of integer;
i: integer;
begin
for i: =1 to 8 do
a[i]: =random(10);
for i: =1 to 8 do
begin
write(a[i]: 3);
end;
writeln;
for i: =8 downto 1 do
write(a[i]: 3);
end.
Популярно: Информатика
-
kdortskaya5511.09.2020 04:55
-
Vladrus2006XD09.01.2022 03:15
-
2Velial126.02.2023 22:21
-
Vad1mi402.02.2020 03:30
-
Starshine200717.04.2021 04:23
-
евген139810.01.2020 15:00
-
kamila077430.03.2020 09:01
-
abdylaevapatima20.03.2023 01:43
-
warfacepolina216.01.2023 00:55
-
lizakiki109.06.2023 23:22