Дан список М предметов. Выбрать предметы, начинающиеся на «му» и заканчивающиеся на «а».
203
283
Ответы на вопрос:
// PascalABC.NET 3.6
begin
var m := ReadlnInteger('M =');
var L := ReadString('Введите слова через пробел:').ToWords.ToList;
if L.Count <> m then
Print('Число предметов не равно', m)
else
L.Where(w -> (w[:3] = 'му') and (w.Last = 'а')).Print
end.
Program menu; uses crt; var m, i: integer; n, z, x, b: longint; begin writeln('выберете пункт меню: '); writeln('[1]вычисление суммы цыфр числа n'); writeln('[2]вывод на экран таблицы квадратов первого десятка'); writeln('[3]дано число n. определить его четность'); writeln('[4]выход'); read(m); case m of 1: begin clrscr; writeln('введите число n: '); read(n); x : = 10; z : = n mod x; while n div x > 0 do begin b : = x; x : = x * 10; z : = z + n mod x div b; end; writeln('ответ: ', z); end; 2: begin clrscr; for i : = 1 to 10 do begin writeln('квадрат ', i, ' = ', sqr(i)); end; end; 3: begin clrscr; writeln('введите число n: '); read(n); if (n mod 2 ) = 0 then writeln('число ', n, ' четное.') else writeln('число ', n, ' не четное.'); end; 4: exit; end; end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
GOLUM34ruS05.05.2020 15:13
-
tynvik03.08.2021 13:12
-
nastyagrigorov14.05.2020 16:32
-
Dedula527.01.2021 00:06
-
murzyatyan24.10.2020 20:12
-
agentWINX18.06.2022 02:07
-
ОленкаБурковська10.04.2020 13:50
-
ПеЧеНьКа81114.05.2020 11:36
-
8952170695701.10.2020 11:42
-
Tunior17.03.2021 11:25
![Caktus Image](/tpl/img/cactus.png)
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.