Ответы на вопрос:
Код программы var a: integer; function c(a: integer): integer; var b: integer; begin b : = 30; a : = -a - 3 * b; if a < b then c : = b + 45 else c : = b - 50; end; begin for a : = 1000 downto -1000 do if c(a) = -20 then begin writeln('a=', a, ' c(a)=', c(a)); break; end; end. вывод a=-120 c(a)=-20 аналитическое решение. видно что c: =b - 50 = 30 - 50 = -20 при a> =b -a-3*b> =b -a-3*30> =30-a-90> =30 -a> =120a< =-120
Популярно: Информатика
-
kirill05523.07.2021 04:37
-
саша1010322.06.2022 07:09
-
maksimovaa122.05.2023 22:14
-
Nalalisa25.06.2023 20:44
-
TennisDiyar05.08.2020 14:54
-
nickolaimatviip0c00u19.12.2021 12:08
-
andreewnamap0c5nx19.11.2020 20:08
-
korol2320.04.2021 22:34
-
ksenia2001200206.11.2022 21:56
-
StopXpeople11.01.2022 21:53