Программа паскаль.
написать программу:
имеется целочисленный массив из 100 элементов
1) вывести на экран через запятую все элементы имеющие чётный индекс;
2) вывести на экран построчно все элементы имеющие нечётный индекс.
126
431
Ответы на вопрос:
var anarray: array[1..100] of integer;
i: integer;
begin
Randomize;
for i := 1 to 100 do // заполняем массив рандомными числами
anarray[i] := random(100);
for i := 1 to 100 do // выводим на экран элементы массива с четным индексом
begin
if (i + 1 > 100) then Write(anarray[i])
else
if (i mod 2 = 0) then Write(anarray[i], ', ');
end;
for i := 1 to 100 do // выводим на экран элементы массива с нечетным индексом
if (i mod 2 <> 0) then WriteLn(anarray[i]);
end.
Объяснение:
var x,y,z,mx,mn:integer;
begin
readln (x,y,z);
x:=x*x;
y:=y*y;
z:=z*z;
mx:=max(x,y,z);
mn:=min(x,y,z);
writeln (mx);
writeln (mn);
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
jenja11722.09.2020 12:09
-
12345678Natalya12.10.2021 15:47
-
Lesa22204.06.2022 04:09
-
mavimkolosov6612.05.2020 21:45
-
nauryzbekova22.09.2022 21:13
-
yerizhevasofa20.03.2021 23:54
-
vanyadrachuk200423.03.2021 21:41
-
aleksBRO13.03.2021 14:58
-
Sofa2912200531.03.2021 03:12
-
HACT9105.04.2021 07:21
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.