Написать программу в pascal группа из 9 студентов сдала 2 экзамена по 2 предметам. оценки от 2 до 5. составить программу которая будет выводить эти сведения и будет показывать количество студентов имеющих средний меньше 3 по двум экзаменам

114

257

Посмотреть ответы 2

Ответы на вопрос:

topalinskaya

Информатика

4,8(99 оценок)

const n=9;

var marks: array[1..n,1..2] of 2..5;

i,k: integer;

begin

writeln('оценки студентов: ');

for i: =1 to n do

begin

marks[i,1]: =random(4)+2;

marks[i,2]: =random(4)+2;

writeln(i,': ',marks[i,1]: 3,marks[i,2]: 3);

end;

k: =0;

for i: =1 to n do

if (marks[i,1]+marks[i,2])/2< 3 then k: =k+1;

writeln('количество студентов, имеющих средний < 3 = ',k);

end.

пример:

оценки студентов:

1: 5 4

2: 5 4

3: 4 3

4: 5 5

5: 2 2

6: 2 3

7: 5 5

8: 3 4

9: 2 2

количество студентов, имеющих средний < 3 = 3

35794488

Информатика

4,6(38 оценок)

Валфавите мощностью 16 символов для хранения одного символа требуется log(2)16 = 4 бита, а алфавите мощностью 256 символов - log(2)256 = 8 бит. следовательно, количество информации во втором тексте больше в 8/4 = 2 раза