3. Установленное программное обеспечение: Наименование программы Версия Назначение
1. Системное программное обеспечение
2. Сервисное программное обеспечение
3. Прикладное программное обеспечение
176
385
Ответы на вопрос:
Var n,a1,d,an,s: integer; procedure p(n,a1,d: integer; var an,s: integer); begin if n> 1 then begin p(n-1,a1,d,an,s); an: =an+d; s: =s+an; end else begin an: =a1; s: =a1; end; end; begin writeln('n, a1, d: '); readln(n,a1,d); p(n,a1,d,an,s); writeln('an = ',an,' s = ',s); end. пример: n, a1, d: 5 34 -2 an = 26 s = 150
Популярно: Информатика
-
alexsashinav19.06.2022 12:08
-
zhludovaanasta30.08.2022 15:49
-
незнайка111713.01.2020 00:20
-
2a0n0u5g17.11.2021 03:13
-
ната1235428.07.2020 02:43
-
seidov0503.10.2020 17:47
-
hfhfhfhffhhfdkdd18.06.2022 13:36
-
naki431.01.2022 02:40
-
круто4514.07.2022 02:49
-
Арте2005.06.2022 10:56