Информатика, опубликовано 2018-08-22 20:32:57 by Гость
Студент зa лето заработал C РУб. Ежемесячная стипендия студента составляет А руб, расходы на проживание - В руб. (А
Ответ оставил Гость
Var A,B,C :real;
time :integer;
begin
Writeln(сколько заработал за лето);
readln(c);
Writeln(стипендия = );
readln(A);
Writeln(расходы на проживание);
Readln(b);
C:=c+a-b;
while (c>=0) do begin
C:=c+a-b;
b:=b+(b/100*3);
time:=time+1;
end;
writeln(денег хватит на ,time, месяцев);
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на