⇢ 
Todasca
Почему выдаёт 96, вместо нужных 7 дней?
program bolnoi;
var t:integer; k:real;
begin
t:=0; k:=50;
while k>=12 do
begin
k:=k-2*20/100;
t:=t+1;
end;
write('Через',t,'дней');
end.
Александр Михайлов
Прикинь по тексту программы: у тебя от к=50 отнимается 0,4 до тех пор пока к больше 12. Получится 95 шагов. Где-то наверное неправильно списал.
Похожие вопросы