Лёгкая по информатике паскаль. по заданному числу x и целому n вычислить x^n используя цикл .
140
466
Ответы на вопрос:
Var x,xn: real; n,i: integer; begin readln(x,n); xn: =1; i: =0; repeat i: =i+1; xn: =xn*x; until i=abs(n); if n< 0 then xn: =1/xn; writeln(x: 3: 1,'^',n,' = ',xn: 6: 4); end. пример: 2 -3 2.0^-3 = 0.1250
Популярно: Информатика
-
serikovas8721.04.2021 00:03
-
Виталина45678907601.08.2020 20:33
-
яч12303.09.2020 20:57
-
afashahbazova28.05.2020 06:53
-
KasiaW18.02.2023 12:56
-
mytaevafati22.10.2020 01:50
-
maximstrekalovs02.06.2020 20:36
-
fedos148813.12.2022 06:00
-
iljapradunp06w1127.10.2022 09:17
-
Allagivorgizova139214.03.2020 20:57