Написать программу в паскале. дано вещественное число а и целое n(n> 1).вывести в табличном виде все целые степени числа а от 1 до n.
254
426
Ответы на вопрос:
Var a,st: real; n,l: integer; begin write('a = '); readln(a); write('n = '); readln(n); st: =1; for n: = 1 to n do begin st: =st*a; writeln(a,'^',n,' = ',st) end; end.
Популярно: Информатика
-
aldera107.02.2023 19:16
-
Помогите11123411.11.2021 10:54
-
naxim2343216.04.2022 05:11
-
kozlovaangelina18.02.2021 01:15
-
bbb7021.01.2021 15:29
-
НикитаДикий26.08.2021 01:48
-
JakaJaka0723.07.2020 01:25
-
kirill88527.04.2021 03:26
-
нету3620.04.2021 15:24
-
abbalbisk125.03.2022 21:18