Вывести все двухзначные числа с чётной суммой цифр. (программа на paskal)
Ответы на вопрос:
ответ:
program sumnum;
var
i: integer;
begin
for i : = 10 to 99 do begin
if (i div 10 + i mod 10) mod 2 = 0 then
write (i, ' ');
end;
readln;
end.
program sport; uses crt; const n = 10; {количество оценок}var {раздел описания переменных} a: array [1..n] of integer; {массив с оценками} max,min,i: integer; {max и min - наибольшая и наименьшая оценки; i -счётчик} sum: real; {сумма, а потом среднее арифметическое (результат)} begin writeln('просим судей выставить свои оценки: '); {вывод строки} for i: =1 to n do {организуем цикл ввода оценок} begin write(i,'-й судья: '); readln(a[i]); {вывод строки и ввод оценки} end; writeln(); {вывод пустой строки (для красоты)} min: =a[1]; {предполагаем для начала, что первая оценка - наименьшая} max: =a[1]; {также предполагаем для начала, что первая оценка - наибольшая} sum: =0; {для начала сумма равна 0} for i: =1 to n do {организуем цикл для перебора всех оценок} begin if max< a[i] then max: =a[i]; {если текущая оценка больше max, то запоминаем её в max} if min> a[i] then min: =a[i]; {если текущая оценка меньше min, то запоминаем её в min} sum: =sum+a[i]; {добавляем текущую оценку к сумме} end; sum: =(sum-max-min)/(n-2); {здесь самое интересное: из суммы всех оценок вычитаем наибольшую и наименьшую, а полученный результат делим на 8 - количество оставшихся оценок. получается среднее арифметическое} writeln('итоговая оценка ',sum: 7: 2) {выводим результат} end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
ganjaman00710.04.2023 11:26
-
proksi0103.06.2023 02:37
-
SkeetNZ26.03.2023 17:07
-
SonyaCarrol07.12.2020 21:47
-
Alinka0411123.01.2021 14:05
-
lefuxetube23.04.2022 02:12
-
38093181778719.02.2021 08:03
-
Соска99725.10.2020 19:07
-
Lika05050910.02.2022 02:06
-
1236321126.11.2020 06:51
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.