3. Всть пропушенные си в программном коде Дана строка - 'hello world'. Программа проверяет пстречается ли букла а л строке. Ести в строке есть, букил а программа останавливает выполнение шкла, в противном случае выводит на экран сообщение "Буквы и в строг for i in 'hello world: if else:

var s,s1: string; n,i: integer; begin readln(s); readln(n); for i: =1 to n do begin insert(s[1],s1,length(s1)+1); delete(s,1,1); end; s: =s+s1; writeln(s); end.

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

var s,i,n,a: integer;

begin

  read(a,n);

  s: =1;

  for i : = 1 to n do

      s: =s*a;

  writeln('a в степени n = ',s);

  s: =1;

  for i : = 1 to n do

      s: =s*i;

  writeln(s);

  s: =0;

  for i: = 1 to n do

  begin

    read(a);

    s: = s + a;

  end;

writeln('среднее арифметическое = ',s/n)

end.

var i: integer;

s,z: real;

begin

    z: =8;

    for i: = 2 to 7 do begin

          s: =s+z;

          z: = z*(1+10/100);

    end;

    writeln(s);

end.