Информатика, опубликовано 06.06.2020 21:32
Можете подсказать как решить эту задачу по циклу FOR?
var
x,i,y,s:integer;
begin
readln (x,y);
s:=1;
for i:=1 to y do
s:=s*y;
writeln (s);
end.
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01