На языке pascal напишите программу, которая будет подсчитывать количество двоек, четвёрок и пятёрок, полученных за контрольную работу по при условии если в классе 32 человека. исходные данные вводятся с клавиатуры с соблюдением правил дружественного интерфейса.

116

454

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

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

hrsalesaudit

Информатика

4,7(91 оценок)

Var a, i, k2, k4, k5, c, d, n: integer; begin write('введите количество учеников в классе: '); readln(n); if (n = 32) then begin c : = 1; d : = 5; writeln('введите оценки учеников: '); k2 : = 0; k4 : = 0; k5 : = 0; i : = 1; while i < = n do begin write('оценка ученика №',i,': '); readln(a); if (c < = a)and(a < = d) then begin case a of 2: k2 : = k2+1; 4: k4 : = k4+1; 5: k5 : = k5+1; end; i : = i+1; end else writeln('неприемлимое значение! допустимые значения: [',c,'..',d,']'); end; writeln('количество двоек: ',k2); writeln('количество четвёрок: ',k4); writeln('количество пятёрок: ',k5); end else writeln('в классе не 32 ученика'); end.

regionagustin

Информатика

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

Ответ в файле: vvvvvvvvvvvvvvvv

оаоашвов

Информатика

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

Дюйм- 2,54 см 10/2,54 = 3,9. значит изображение 3,9 * 3,9 дюйм способность сканера 1200 dpi (а не 1200*1200) 3,9 * 1200 = 4680 пикселей получается изображение 4680*4680 = 21902400 пикселей 21902400 *24/8 = 65707200 байт = 62,66 мб