воскресенье, 22 ноября 2015 г.

Задание на 30 ноября

1)Повторить разобранную на уроке Задача №30
Program  deng30;
var  i  :integer;
s ,P :real;
begin
 S:=200000;
writeln('введите денежный процент P = ');
readln(P);
for  i:=1626  to  2012  do
S:= S+S/100*P;
writeln('s = ', s:15:0);
end.
2)Заполнить рабочая тетрадь стр 75
3)Сделать №32 и №33


Комментариев нет:

Отправить комментарий