Я знаю что сказать,я знаю что купить, я знаю что Одеть.
я знаю как решить , я знаю как построить, я знаю как одеть
<span>1)3.14159 +
</span><span>2)150 +
</span><span>3)0,005 +
</span><span>4).12345 +
</span><span>5)16. (если точку случайно поставили, то правильно, если должна быть то нет)
</span><span>6)15.0Е-04 -
</span>7)2.345Е2 -
<span>8) 1.15Е-3 -
</span><span>9) 12.SE.3 -
</span><span>10) 12Е+5 -
</span><span>11) Л23ЕЗ -
</span><span>12) 1.15Е-3 -
</span>Минут - не правильно, плюс - правильно
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,' месяцев');
<span>end.</span>