Ответы на вопрос:
Program tablmul; const size = 7; var ball: array[1..size] of real; ocenka: array[1..size] of integer; counter: integer; begin counter : = 1; while (counter < = size) do begin write('введите ', counter, ' ученика: '); readln(ball[counter]); counter : = counter + 1; end; counter : = 1; repeat if (ball[counter] > 90) then ocenka[counter] : = 5 else if (ball[counter] > = 75) and (ball[counter] < 90) then ocenka[counter] : = 4 else if (ball[counter] > = 50) and (ball[counter] < 75) then ocenka[counter] : = 3 else ocenka[counter] : = 2; counter : = counter + 1; until (counter > size); writeln(); for var i : = 1 to size do writeln('оценка ', i, ' ученика: ', ocenka[i]); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
20MIR0116.06.2020 11:42
-
Мирэя20.12.2021 05:25
-
oksana19018116.02.2021 10:14
-
мTTTTTTся10.10.2020 10:50
-
Nurzhan9421.05.2021 06:27
-
impalaSam31.07.2022 20:02
-
theknow1411.04.2023 18:32
-
SlavZgr20.10.2022 08:01
-
2345metal678927.06.2023 02:40
-
AliceandCat12.02.2020 03:16
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.