Https://.org/milcents/discussions/watch-full-rupauls-drag-race-season-12-episode-12-online-free/
https://.org/milcents/discussions/rupauls-drag-race-season-12-episode-12-s12e12-full-episodes/

https://.org/milcents/discussions/vh1-watch-rupauls-drag-race-season-12-episode-12-full-online-free/

Question

Информатика: Https://.org/milcents/discussions/watch-full-rupauls-drag-race-season-12-episode-12-online-free/ https://.org/milcents/discussions/rupauls-drag-race-season-12-episode-12-s12e12-full-episodes/ https://.org/milcents/discussions/vh1-watch-rupauls-drag-race-season-12-episode-12-full-online-free/

FireGame228 · Accepted Answer

Программа, которая использует два массива

var
c, a: array[1..20] of integer;
i: integer;
begin
write('Первый массив ');
for i := 1 to 20 do   begin
c[i] := i * (-5);
write(c[i], ' ');
end;
writeln;
write('Преобразованный массив ');
for i := 1 to 20 do   begin
a[i] := c[20 - i + 1];
write(a[i], ' ');
end;
end.

ИЛИ Программа не использующая два массива, а просто переворачивающая первый

var
c: array[1..20] of integer;
i: integer;
begin write('Первый массив ');
for i := 1 to 20 do   begin
c[i] := i * (-5);
write(c[i], ' ');
end;
writeln;
write('Преобразованный массив ');
for i := 20 downto 1 do  write(c[i], ' ');
end.

Обе программы работают!

Https://.org/milcents/discussions/watch-full-rupauls-drag-race-season-12-episode-12-online-free/ https://.org/milcents/discussions/rupauls-drag-race-season-12-episode-12-s12e12-full-episodes/ https://.org/milcents/discussions/vh1-watch-rupauls-drag-race-season-12-episode-12-full-online-free/

MOGZ ответил

Https://.org/milcents/discussions/watch-full-rupauls-drag-race-season-12-episode-12-online-free/
https://.org/milcents/discussions/rupauls-drag-race-season-12-episode-12-s12e12-full-episodes/

https://.org/milcents/discussions/vh1-watch-rupauls-drag-race-season-12-episode-12-full-online-free/