Напишите в ячейке H8 функцию для расчета количества отсутствующих учеников за субботу,если отсутствующим считается ученик,пропустивший не менее 6 уроков ​

20 человек

Объяснение:

Если всеми тремя языками владеют 3 человека, то

- Только Н и Ф (без А) одновременно владеют 5-3 = 2 человека

- Только А и Ф (без Н) одновременно владеют 10-3 = 7 человек

- Только А и Н (без Ф) одновременно владеют 8-3 = 5 человек

- Только А (без Н и Ф) владеют 28 - (3+5+7) = 13 человек

- Только Ф (без А и Н) владеют 42 - (2+3+7) = 30 человек

- Только Н (без Ф и А) владеют 30 - (2+3+5) = 20 человек

- Не владеет ни одним из языков 100 - (13+30+20+2+7+5+3) = 100 - 80 = 20 человек

ответ: 20 человек.

1)Составьте программу, которая находит большее из двух введенных с
клавиатуры чисел a, b и выводит его на экран. Числа 7 и 9
var a,b : integer;
begin
 write('Enter a: ');
 read(a);
 write('Enter b: ');
 read(b);
 if a>b then writeln(a)
 else writeln(b);
end.
2) Составьте программу, которая находит меньшее из трёх введенных
чисел a, b, c и выводит его на экран. Числа 10, 4 и 9
var a,b,c : integer;
begin
 write('Enter a: ');
 read(a);
 write('Enter b: ');
 read(b);
 write('Enter c: ');
 read(c);
 if (a<b) and (b<c)  then writeln(a);
  if (b<c) and (c<a) then writeln(b)
  else writeln(c);
end.
3) Составьте программу определяющую, является ли введенное с
клавиатуры целое число кратным 3.
var a: integer;
begin
 write('Enter a: ');
 read(a);
 if (a mod 3) = 0 then writeln('Кратно')
 else writeln('Не кратно');
end.