Циклы на Delphi
2.
If vklad=200000 then proc:=13,5
else if vklad=350000 then proc:=14,2;
3.
While n>5 do
begin
kg:=kg*4;
n:=n-5;
end;
4.
Sum m k
0 10 0
1 8 1
3 6 2
6 4 3
10 2 4
15 0 5
