Ответы на вопрос:
Const glasnie=['e', 'y', 'u', 'i', 'o', 'a','e', 'y', 'u', 'i', 'o', 'a']; var i,k: integer; s: string; begin readln(s); k: =0; for i: =1 to length(s) do if s[i] in glasnie then k: =k+1; writeln('количество гласных - ',k)end.
Var i, chet, summa: integer; mass: array[0..24] of integer; begin for i: =0 to 24 do begin mass[i]: = random(-50,50); if (mass[i] mod 2 = 0) then begin chet+=1; writeln('элемент массива под номером ' + (i+1) + ' равен ' + mass[i] + ' и чётен.'); end else begin writeln('элемент массива под номером ' + (i+1) + ' равен ' + mass[i] + ' и нечётен.'); summa+=mass[i]; end; end; writeln('количество чётных членов массива: ', chet); write('сумма нечётных членов массива: ', summa); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
zhanar777729.09.2020 14:32
-
183058330.05.2020 02:02
-
dhgdfnhflk05.10.2022 22:48
-
Arina301019.07.2022 15:09
-
наталья73204.07.2021 16:14
-
Lis25pfi17426.05.2022 02:55
-
Sn00ру13.09.2021 10:31
-
bosschornoguz05.09.2020 05:36
-
begimay042406.09.2022 09:52
-
viklya3012.08.2020 02:25
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.