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

помогите пожалуйста! напишите программу возведения числа в целую степень. число и степень запрашивайте у пользователя

  1. Ответ
    Ответ дан Ghost22

    Program PR1;
    uses crt;
    var a,b:real;
    begin
    clrscr;
    writeln('Vvedite chislo i stepen');
    readln(a,b);
    writeln(exp(a*ln(b)));
    end.

  2. Ответ
    Ответ дан glebglebgleb

    var
    a,b,i,s:integer;
    begin
    readln(a);
    readln(b);
    s:=a;

    for i:=2 to b do
    s:=s*a;
    writeln (s);
    end.

Самые новые вопросы