Программирование.паскаль.массивы 1)дан массив р(15).найти сумму всех отрицательных элементов с четными индексами.полученный результат вывести на экран. 2)ввести с пульта оператора массив мас1 семь целых чисел. переписать из мас1 в мас2 элементы значения которых положительные,в мас3 элементы значения которых отрицательные. на пульт оператора вывести значения мас1,мас2,мас3
244
422
Ответы на вопрос:
Program chik; const n=15; var p: array[1..15]of real; i: integer; s: real; begin s: =0; for i: =1 to n do begin read(p[i]); if(i mod 2=0)and(p[i]< 0)then s: =s+p[i]; end; writeln(s); end.2)program gt; uses crt,graphabc; const n=7; var mac1,mac2,mac3: array[1..15]of real; i,k1,k2: integer; begink1: =0; k2: =0; for i: =1 to n dobeginread(mac1[i]); if(mac1[i]> 0)then begininc(k1); mac2[k1]: =mac1[i]; end; if(mac1[i]< 0)then begininc(k2); mac3[k2]: =mac1[i]; end; end; for i: =1 to n dowrite(mac1[i],' '); writeln; for i: =1 to k1 dowrite(mac2[i],' '); writeln; for i: =1 to k2 dowrite(mac3[i],' '); end.
a = int(input('Число: '))
s = 0 # здесь будет произведение
for i in list(str(a)): # превратил введённое число в строку, и эту строку сделал списком.
if int(i)>3:
if not(s): s+=1
s *= i # проверяю больше ли i-ое число 3-х, если да то умножаю s на него
print("Произведение цифр введённого числа =", s)
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
petrovspb10.09.2022 15:40
-
master20415.11.2020 12:09
-
тупоумная252526.10.2021 20:04
-
Котенька020911.07.2022 07:51
-
aleks1yus25.09.2020 21:45
-
Yanuska22431.08.2020 16:38
-
HYPE11120.12.2022 17:13
-
Vzorr22.06.2020 01:25
-
gagammil22.06.2021 22:01
-
AnastasiaBA30.07.2022 04:51
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.