Naik
6 год назад
СРОЧНО!!! ДАЮ 25 БАЛЛОВ
Ребят помогите составить программы по информатике на языке Pascal
ОТВЕТЫ
Алексеевич
Aug 2, 2019
1 Вар
Var i:integer;
k:real;
Begin
k:=10;
for i:=1 to 7 do
k:=k+k*0.1;
writeln(k);
End.
Var i:integer;
k:real;
Begin
k:=10;
for i:=1 to 7 do
k:=k+k*0.1;
writeln(k);
End.
29
Смежные вопросы:
