Pascal abc мне нужна программа для ракеты, которая летит вверх , , если кто-то знает)
243
485
Ответы на вопрос:
Могу ошибатся uses graphabc; var x: integer; begin lockdrawing; for x: =3 to 500 do begin clearwindow; circle (249,500,155); rectangle (250,350,220,200); circle (235,290,10); circle (235,250,10); line (249,202,230,160); line (219,200,230,160); circle (228,355,5); circle (235,355,5); circle (245,355,5); circle (241,365,5); circle (234,365,5); circle (238,375,5); redraw; end; end.
1)uses crt; const n=5; var a: array[1..n] of integer; i: integer; begin for i: =1 to n do readln(a[i]); writeln; writeln(a[4]); end. 2)uses crt; const n=10; var a: array[1..n] of integer; i: integer; begin for i: =1 to n do a[i]: =i*2; writeln(a[8]); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
aman138219.06.2022 14:16
-
ВиГуки24728.07.2021 01:24
-
daryatabuewa10.05.2023 22:44
-
TheDorams17.04.2020 16:02
-
kato9905.01.2021 20:00
-
SelesTia328.03.2020 09:04
-
sanjabr82oymx7f14.07.2021 07:16
-
Зорро201708.11.2020 17:58
-
коля85615.08.2021 22:43
-
Djunisova29.12.2021 15:30
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.