profile
Опубликовано 5 лет назад по предмету Информатика от vaneksolodovnikov200

Помогите пожалуйста с заданием номер 4

  1. Ответ
    Ответ дан raiszzz
    var x, n, i, res: Integer;
    begin
    WriteLn('Введите число X');
    ReadLn(x);
    WriteLn('Введите число N');
    ReadLn(n);
    res := 1;
    for i:= 1 to n do
    begin
    res := res*x;
    end;
    WriteLn(x, ' в степени ', n, ' равно ', res);
    end.
Самые новые вопросы