Есть ответ 👍

Ниже записана программа. Получив на вход число x, эта программа печатает два числа L и M. Укажите наименьшее из таких чисел x, при вводе которых алгоритм печатает сначала 3, а потом 5. Паскаль
var x, L, M: integer;
begin readln(x); L:=0; M:=0;
while x > 0 do begin
L:= L + 1; x:= x div 10;
if L mod 2 = 0 then
M:= M + (x mod 10);
end; writeln(L); write(M);
end.

258
308
Посмотреть ответы 1

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


var i: integer;

s,z: real;

begin

    z: =8;

    for i: = 2 to 7 do begin

          s: =s+z;

          z: = z*(1+10/100);

    end;

    writeln(s);

end.

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