24 ! по информатике рост ребёнка 120 см. каждый месяц увеличивается на 2%. какой будет рост ребенка через n месяцев введеной клавиатуры. решить через -repeat; for;
Var n: integer; var heigth: real; begin heigth := 120; writeln('n = '); readln(n); for var i := 1 to n do heigth := heigth * 1.02; writeln('Heigth = ',heigth); end.
var n: integer; var heigth: real; begin heigth := 120; writeln('n = '); readln(n); repeat begin heigth := heigth * 1.02; n := n - 1 end until n = 0; writeln('Heigth = ',heigth); end.
var heigth: real;
begin
heigth := 120;
writeln('n = ');
readln(n);
for var i := 1 to n do
heigth := heigth * 1.02;
writeln('Heigth = ',heigth);
end.
var n: integer;
var heigth: real;
begin
heigth := 120;
writeln('n = ');
readln(n);
repeat
begin
heigth := heigth * 1.02;
n := n - 1
end
until n = 0;
writeln('Heigth = ',heigth);
end.