Вычислите значение по фрагменту программы
var k, i:ineger;
begin
k:=2;
for i:=0 to 2 do
k:3*k+i;
writeln(k);
end

красотка368    1   22.05.2020 11:08    0