В школьной олимпиаде участвовало 75 человек, победителями считаются те, кто набрал больше 90 % по каждому предмету. Итоговая таблица участников представлена на рисунке. Составь условие, при которого можно будет определить победителей.

текст: happy new year, dear содержит 30 символов. при кодировании текста с acsii каждый символ кодиреутся 8 битами или 1 байтом, следовательно

30 символов = 30 байт или  30 * 8 = 240 бит

var x1,x2,x3,x4,x5: integer;

s: real;

begin

  read(x1,x2,x3,x4,x5);

  s: = (x1+x2+x3)/(x4+x5);

  if round(s)=s then writeln("celoe - "s);

end.

var x: real; begin  read(x);   writeln(round(x)); end.

program a1; vara: array [1..15] of integer; a2: array [1..15] of integer; mas1: integer; mas2: integer; raz: integer; i: integer; begin//подключаем датчик случайных чиселrandomize; //цикл заполняющий массивы и нахождение сумм элементов масиваfor i: =1 to 15 dobegina[i]: =random(100); a2[i]: =sqr(a[i])-a[i]; mas1: =mas1+a[i]; mas2: =mas2+a2[i]; end; //находим разницу массивовraz: =mas1-mas2; //выводим на экран 1ый массивwrite('первый массив: '); for i: =1 to 15 dobeginwrite(a[i],'|')end; writeln(''); //выводим на экран 2ой массивwrite('второй массив: '); for i: =1 to 15 dobeginwrite(a2[i],'|')end; writeln(''); //выводим на экран разность массивовwrite('разность сумм элементов массива: ', raz); writeln(''); end.