Вклассе 7 учеников, известны результаты сдачи экзаменов по двум предметам. составьте программу вычисления количества учащихся, сдавщих оба экзамена на отлично. вывести на экран исходную матрицу-ведомость, результаты подсчета и средний по каждому предмету. паскаль
246
332
Ответы на вопрос:
Program u; var i,j,k: integer; b: array[1..7] of string; a: array[1..7,1..3] of real; begin k: =0; writeln('запишите фамилии учеников в столбик'); for i: =1 to 7 do readln(b[i]); for i: =1 to 7 do writeln(b[i]); for i: =1 to 7 do begin writeln('запишите оценки' , b[i]); for j: =1 to 2 do read (a[i,j]); end; for i: =1 to 7 do a[i,3]: =(a[i,1]+a[i,2])/2 ; for i: =1 to 7 do begin writeln; write(b[i],' ',45a[i,1],' ',a[i,2],' средняя оценка ',a[i,3]); end; writeln; for i: =1 to 7 do if (a[i,1]=5) and (a[i,2]=5)then k: =k+1; writeln('количество отличников ',k); end.
Алгоритм получения из числа 5 числа 26, содержащий не более 5 команд.1. уменьшает число на 12. вторая утраивает число 5-1=4 (1) 4-1=3 (1) 3*3=9 (2) 9*3=27 (2) 27-1=26 (1) ответ: 11221
Популярно: Информатика
-
57safavi29.02.2020 11:08
-
Ellenkpop30.04.2023 15:50
-
Aizek11101.05.2021 10:21
-
PotyLive06.07.2021 05:26
-
Тима7771126.05.2023 06:33
-
BlackJuice03.01.2022 09:02
-
смерть7326.06.2021 12:51
-
maratkaa33709.12.2020 05:55
-
samira12406.08.2021 00:52
-
sasha12312347622.03.2022 22:14