1.Масив А[1..5] заповнено числами 3, 8, 5, 7, 6. Виконайте дії з елементами масиву: a) For i:=1 to 5 do A[i] := -A[i];
6) For i:=1 to 5 do
If A[i] mod 3 = 0 Then A[i] := A[i] div 3;
B) For i := 1 to 5 do
If i mod 2 = 0 Then A[i] := 0;
r) S:= 0; For i:= 1 to 5 do S:= S + A[i];
A) P := 1; For i := 1 to 5 do If A[i] <= 5 Then P := P * A[i];
e) K := 0; For i = 1 to 5 do If A[i] > 5 Then K:= K + 1;
260
328
Ответы на вопрос:
Var a,b: integer; begin write('a='); readln(a); write('b='); readln(b); if a=b then begin a: =0; b: =0; end else if a> b then b: =a else a: =b; writeln('a=',a,' b=',b); end. пример: a=3 b=5 a=5 b=5
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
lhukotunl02.08.2022 09:33
-
aska13aska22.05.2021 11:20
-
Рыжик15104.11.2021 20:32
-
ggf6fr17.02.2022 16:36
-
Viktoria2004040102.09.2020 11:10
-
mirator9111.05.2021 07:56
-
madecat15.06.2023 21:55
-
tatarincevai26.01.2023 23:33
-
Rookgolf6004.04.2020 06:16
-
lilo5220.09.2022 18:10
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.