Нужна ! паскаль! ввести 2 целых числа и вывести на экран четные и нечётные числа,но чтобы четные были со знаком "-" минус.используя команду if (i mod 2) < > 0 then
111
116
Ответы на вопрос:
Program abc; var a, b, k: integer; begin read (a, b); for k: =1 to (b-a) do begin if (a mod 2) < > 0 then writeln ( a) else writeln ('-', a); a: =a+1 end; end.
1) Решение, если можно пользоваться возведением в степень:
for i in range(1, 9):
print(i ** i)
2) Решение, если нельзя пользоваться возведением в степень
for i in range(1, 9):
p = 1
for g in range(0, i):
p *= i
print(p)
Популярно: Информатика
-
аслансосланов24.02.2023 16:00
-
HAHAEZ201014.02.2022 01:39
-
maklakovatattu07.07.2022 20:21
-
ksusha25night02.03.2022 15:45
-
ХасекиКуро04.01.2023 22:00
-
sashamissmalevozgk5605.05.2023 18:50
-
ViKa0908900901.02.2022 06:40
-
Arkadop02.11.2022 12:24
-
fvgfds17.09.2022 00:05
-
IG7718.07.2021 14:41