Помогите с Информатикой

Приложения:

Ответы

Ответ дал: dim4942
0

Ответ:

1)

If a>b then write('a>b')

2) 72

3)

Begin

Count:=0;

Sum:=0;

While(sum<1000) do begin

Sum:=sum+86;

Count:=count+1;

End;

End.

4)20

5)

Квадрат, в котором записана эта формула

Вас заинтересует