Помогите с Информатикой
Приложения:

Ответы на вопрос
Ответил 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)
Квадрат, в котором записана эта формула
Новые вопросы