решить задачу на пайтоне 2 Вывести степени натуральных чисел, не превосходящие данного числа n. Пользователь задает показатель степени и число n
281
333
Ответы на вопрос:
Показатель степени: 2
Максимальный предел степени: 100
1 4 9 16 25 36 49 64 81 100
Последнее число, возведенное в степень: 10
Показатель степени: 3
Максимальный предел степени: 555
1 8 27 64 125 216 343 512
Последнее число, возведенное в степень: 8
Объяснение:
Как то так
Var n: integer; a,s: real; begin writeln('введите n'); readln(n); writeln('введите числа'); s: =0; for n: =1 to n do begin read(a); if a> 0 then s: =s+a; end; if s=0 then write('положительных чисел нет') else write('s = ',s) end.
Популярно: Информатика
-
Artem15200621.04.2021 18:02
-
aadfgjrv02.01.2021 17:36
-
диана246730.05.2021 08:01
-
nucubidzezura07.03.2021 10:30
-
marinka10k09.01.2020 22:53
-
magasaidov14.01.2021 23:19
-
Микарусский07.02.2021 00:50
-
маша302512.06.2023 18:17
-
Aidanok117.12.2021 10:39
-
ludvig912.10.2021 09:49