Ответ 81, но у меня почему то выводит 1var s,k:integer;begins:=1;for k:=3 to 0 dos:=s*3; write(s);end.что неправильно?
Ответ 81, но у меня почему то выводит 1
var s,k:integer;
begin
s:=1;
for k:=3 to 0 do
s:=s*3;
write(s);
end.
что неправильно?
Гость
Ответ(ы) на вопрос:
ГостьVar s:integer;
Begin
S:=1;
For k:=3 to 6 do
s:=k*3
Writeln (s);
End.
Не нашли ответ?
Похожие вопросы