< >

Можете подсказать как решить эту задачу по циклу 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.

Ответа на этот вопрос пока нет. Попробуйте найти его через форму поиска.

Похожие вопросы
Русский язык
1 год назад
Почему язык - это общественное явление? (10 - 12 предложений)
Українська мова
1 год назад
на які питання відповідає прийменник
Физика
2 года назад
ДАМ 30 БАЛЛОВ!!!! Автомобиль и комбайн движутся прямолинейно, так что некоторое время расстояние между ними не меняется. Укажите, относительно каких тел каждый из них находится в покое, и
Математика
2 года назад
шкафах 2640 книг в первом и во втором шкафах 1710 книг а во втором и в третьем 1820 несколько книг в каждом шкафу с условием задача​
География
8 лет назад
Определите с помощью компаса положение сторон горизонта
Алгебра
8 лет назад
пожалуйста помогите по алгебре 1 вариант
Математика
9 лет назад
за 12 пачек стирального порошка заплатили на 320р меньше.чем за 16 таких же пачек.По какой цене покупали стиральный порошок?
Обществознание
9 лет назад
Расмотрите в качестве примера любую ситуацию из своей жизни в которой вы проявляете себя в общении