Ответы на вопрос:
Код на Паскале:
program z6;
var i, b, z: integer;
a: array [1..10] of integer;
BEGIN
for i:=1 to 10 do begin a[i]:=i*i;
writeln (i, ' = ' , a[i]);
end;
writeln;
writeln;
b:=a[10];
for i:=0 to 8 do begin
a[10-i]:=a[9-i];
z:=10-i;
writeln (z, ' = ' , a[10-i]);
end;
a[1]:=b;
writeln('1 = ', a[1]);
END.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Другие предметы
-
РенатаG01.09.2020 02:14
-
prencessviki21.04.2021 21:53
-
Ленари26.04.2020 17:57
-
bugaerstasy01.10.2020 22:50
-
ulianaroingova15.11.2021 14:25
-
юля41728.03.2021 02:43
-
romkastolz03.06.2021 16:02
-
GabriellaKiM13.01.2021 11:36
-
ГрозаТараканов09.12.2020 02:31
-
manazoid16.02.2023 03:28
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.