Есть ответ 👍

Как можно побыстрее)
Буду благодарен!!!

202
240
Посмотреть ответы 2

Ответы на вопрос:

sssmak1
4,6(28 оценок)

x := 43

z := 1

i := 0

1 итерация цикла:

z := (1+43/2)/2 = 22,2/2 = 11,25

i := 0 + 1 = 1

2 итерация цикла:

z := (11,25 + 43/2)/2 = 32,75/2 = 16,375

i := 1 + 1 = 2

3 итерация цикла:  

z := (16,375 + 43/2)/2 = 37,875/2 = 18,9375

i := 2 + 1 = 3

4 итерация цикла:  

z := (18,9375 + 43/2)/2 = 40,4375/2 = 20,21875

i := 3 + 1 = 4

i < 4 - условие не выполняется, выводим 20,21875(округляем до 20,2)

ответ: 20,2


Program gogo; uses crt; const n=10; var a: array[1..n,1..n] of real; sm: real;     i,j: byte; begin clrscr;   for i: =1 to n do    begin  for j: =1 to n do begin  write('vvedite ',i,'.',j,' cifru '); readln(a[i,j]);   end;   end; sm: =0; for i: =1 to n do   begin     for j: =1 to n do       begin        if j> i then sm: =sm+abs(a[i,j]);       end;     writeln;   end; write('summa=',sm: 0: 3); readln end.

Популярно: Информатика