|
|
|
|
|
|
|
Вернуться
| 1 Подлеснов Владислав Олегович, 22 января 2011 г. 16:46:24 | |
Так с именем не повезло? Может имеет смысл поменять?:)
Для дружеской поддержки программа:
var
a,s:real;
k:integer;
begin
read(a);
s:=a; k:=1;
while a<=100 do begin
a:=a+a*0.06;
s:=s+a;
k:=k+1
end;
writeln('probeg=',a:0:3);
writeln('dney- ',k);
writeln('vsego km-',s:0:3)
end.
|
|
|
| 2 Тёма, 22 января 2011 г. 12:58:12 | |
|
б процентов - это как?
|
|
|
| 3 Жолудев Андрей Андреевич, 19 января 2011 г. 20:03:26 | |
|
вводишь переменную как 1 и в цикле каждый раз умножаешь на 1.06 и прибавляешь ее к другой переменной-щетчику.
|
|
|
Чтобы оставить сообщение необходимо зарегистрироваться и авторизоваться!
| | | |
