Водномерном целочисленном массиве из 10 элементов 1.найдите количество отрицательных элементов с четными номерами. 2.найдите произведение элементов, стоящих после 0. массив нулем не заканчивается. в pascal
269
288
Ответы на вопрос:
Uses crt; var mas: array [1..10] of integer; i,a: integer; begin clrscr; writeln('input massive'); a: =0; for i: =1 to 10 do begin readln(mas[i]); if (i mod 2 =0) and (mas[i] < 0) then a: =a+1; end; writeln('answer ',a); end. number 2 uses crt; var mas: array [1..10] of integer; i,a,k: integer; begin clrscr; writeln('input massive'); for i: =1 to 10 do readln(mas[i]); i: =1; while (mas[i]< > 0) and (i< 10 ) do i: =i+1; k: =1; if i < 10 then begin for a: =i to 10 do k: =k*mas[a]; writeln(k); end else writeln('nulya net'); end.
Program dfgdf; var m,o,r,f: real; begin writeln('оценку по введите'); readln(m); if (m> =1) and (m< =5) then begin writeln('оценку по введите'); readln(r); if (r> =1) and (r< =5) then begin writeln('оценку по введите'); readln(f); if (f> =1) and (f< =5) then begin o: =(m+f+r+5)/4; writeln('средняя оценка = ',o); end else begin writeln('не корректный ! '); end; end else writeln('не корректный ! ') end else writeln('не корректный ! ') end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
eminka118.05.2021 16:21
-
braaauberg09.04.2020 11:29
-
Abdua24517.06.2022 19:12
-
123Dulya15.08.2020 19:20
-
mashav88211.08.2020 16:20
-
swetammm201810.09.2021 17:43
-
4ex9s14.11.2021 22:02
-
Эленедмонд20.04.2022 02:50
-
sokolovskaymasha10.05.2022 02:10
-
myhaylonotochk05.10.2021 09:07
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.