Төменде берілген программа кодтарын жазуда жіберілген қателерді тап

​

чтение из файла обычно пишется 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)

s : = 1 ;

for i : = 1 to n do

  if a[i] mod 3 = 0 then

          s : = s * a[i];

writeln(s);

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

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