Ответы на вопрос:
Можно сделать презентацию онлайн, введи в поиск и тебе выдаст кучу результатов)
Uses crt; type oc=record per,bt,tr: integer; end; ab=record fam,im: string; ocen: oc; end; var b: array [1..50] of ab; l: ab; i,n,g,k,h: integer; begin clrscr; writeln ('введи количество абитуриентов'); readln (n); writeln ('вводи фамилии, имена и 3 оценки'); for i: =1 to n do with b[i] do begin readln (fam); readln (im); readln (ocen.per,ocen.bt,ocen.tr); end; clrscr; for j: =1 to n do for i: =1 to n-1 do if b[i].fam> b[i+1].fam then begin l: =b[i]; b[i]: =b[i+1]; b[i+1]: =l; end; writeln ('список всех аббитуриентов: '); for i: =1 to n do writeln (b[i].fam,' ',b[i].im,' ',b[i].ocen.per,' ',b[i].ocen.bt,' ',b[i].ocen.tr); writeln ('список допущенных аббитуриентов'); for i: =1 to n do with b[i] do begin with ocen do if (per> 30) and (bt> 30) and (tr> 30) and (per+bt+tr> 140) then writeln (fam,' ',im,' ',ocen.per,' ',ocen.bt,' ',ocen.tr); end; readln; end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
245mkl29.03.2021 20:28
-
bodajkunasta04.07.2020 06:42
-
MrFoksSuper18.04.2022 07:54
-
alexander12413123.01.2023 11:00
-
sofiyaserysheva25.05.2020 14:25
-
aaalino4ka04.08.2020 16:49
-
krasnyukova122.03.2021 08:30
-
KseshaMail10.03.2020 20:21
-
puzhalina77Frik19.05.2023 13:09
-
Timoxa56501.06.2021 00:15
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.