Помогите составить блок схему к программе паскаль

Задание:

Помогите составить блок схему к программе паскаль. var a,b: Real; begin Read (a,b); if (a < 0) then a: =(-a) else a: =a+0,5; if (b < 0) then b: =(-b) else b: =b+0,5; WriteLn (', a,', b); end.

Решение:

__________________________________________________________________

Знаете другой ответ?

Отправить свой ответ