Требования для создания интерфейса программы​

Const
  problems : array [0..9] of String = ('x1+5=10', 'x1+5=10', 'x1+5=10', 'x1+5=10', 'x1+5=10', 'x1+5=10', 'x1+5=10','x1+5=10', 'x1+5=10', 'x1+5=10');
  answers : array [0..9] of String = ('-5', '-5', '-5', '-5', '-5', '-5', '-5', '-5', '-5', '-5');
var
  countOfAnswers, counter: integer;
  userAnswer: String;
begin
  countOfAnswers := 0;
  for counter:=0 to 9 do
    begin
      write('Введите ответ уравнения ', problems[counter], ' : ');
      readln(userAnswer);
      if userAnswer = answers[counter] then Inc(countOfAnswers);
    end;
if countOfAnswers > 8 then writeln('Отлично')
    else if countOfAnswers > 5 then writeln('Хорошо')
    else writeln('Плохо');
end.

Интернет-зависимость – это расстройство в психике, сопровождающееся большим количеством поведенческих проблем и в общем заключающееся в не человека вовремя выйти из сети, а также в постоянном присутствии навязчивого желания туда войти.

Чем опасна интернет-зависимость

Психологи бьют тревогу и сравнивают феномен интернет-зависимости не иначе как с пристрастием к алкоголю и наркотикам. Поводы для беспокойства действительно имеются. Проводимые исследования на тему интернет-зависимости показывают, что при длительном и неконтролируемом нахождении в сети происходят изменения в состоянии сознания и в функционировании головного мозга. Постепенно это приводит к потере обучаться и глубоко мыслить.

Объяснение:

Как то так. Ну это не совсем про школьников можешь не немного переделать.