Ответы
Ответ дал:
1
Ответ:
a)
var
I, k: integer;
S: real;
begin
k:=81;
S:=4;
for I:=1 to k do S:=S/2;
end.
b)
var
s: integer;
begin
s:=10;
s:=s+2;
for s:=1 to 10 do writeln(s);
end.
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
6 лет назад
8 лет назад