Есть ответ 👍

НУЖНЫ СКРИНЫ нужно решить использовав стандартный калькулятор Windows, калькулятор инженерный нужно решить с калькулятора чтоб получить такие ответы

207
230
Посмотреть ответы 1

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


Var a,b: real; i,d: integer; begin a: =0; b: =0; d: =1; for i: =1 to 30 do begin  a: =a+100;   b: =b+d;   d: =d*2;   end; b: =b/100; if a> b then writeln('богач отдал больше') else writeln('бедный отдал больше'); end.

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