НУЖНЫ СКРИНЫ нужно решить использовав стандартный калькулятор Windows, калькулятор инженерный нужно решить с калькулятора чтоб получить такие ответы
207
230
Ответы на вопрос:
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.
Популярно: Информатика
-
русланчик820.02.2022 17:47
-
SoniaSor22.09.2021 09:44
-
Стерва1234501.08.2022 01:30
-
helppliz507.02.2022 05:51
-
valerango08.05.2022 08:00
-
andreyoy09.08.2020 20:24
-
Mucuo3124.06.2022 23:45
-
vikylev01115.10.2022 13:14
-
Stultus30.05.2022 21:14
-
ed3112102.11.2022 05:29