1. создайте таблицу «режим дня» и не забудьте ввести в та
блицу время пользования компьютером.
2. ситуационное . что вы посоветуете жандосу
мой совет
действие
жандос пришел из школы, пообедал,
и сразу сел за компьютер. делал
перерывы каждые 30 минут, но при
этом забыл выполнить
. выключил компьютер
только тогда, когда родители пришли
с работы.​

(неясно-пиши в личку)

4 клетки вниз и 7 вправо                                                                                                                           

var n,z: longint;

begin

  read(n);

  z: =abs(n);

  z: =z-2;

  writeln(z);

end.

чтение из файла обычно пишется readln(f,s) где f имя файловой переменной так что скорей всего нужно вставить

readln(input,s); s: =s+' '; f: =0; for i: = 1 to length(s) do beginif s[i]< > ' ' then r: =r+s[i]; if s[i]=' ' then begin k: =k+1; d[k]: =r; r: =''; end; end; readln(input,n); for i: = 1 to n do beginreadln(input,sait[i]); readln(input,tegs[i]); readln(input,pop[i]);

соответственно и запись в файл write(f,s)