1. выполните подстановку операции так , чтобы равенство() or not ()= оказалось верным. 2.выполните подстановку операции так , чтобы (1 and =0 оказалось верным.
125
246
Ответы на вопрос:
Var a,b,c,m : integer; begin readln(a,b,c); if (a> b) and (b> c) and (c> 0) then begin a: =a*a; b: =b*b; c: =c*c; end else if (a< 0) and (b< 0) and (c< 0) and (a< > b) and (a< > c) and (b< > c) then begin m: =a; if b> m then m: =b; if c> m then m: =c; a: =m; b: =m; c: =m; end else begin writeln('сумма: ',a+b+c); halt(0); end; writeln('a = ',a,' b =',b,' c = ',c); end.
Популярно: Информатика
-
sodzirovna28.02.2020 00:21
-
veronikasimonova110.09.2020 03:28
-
sammerosetrova23.08.2021 11:34
-
SkeetNZ21.06.2022 15:19
-
22031982golub08.10.2021 15:22
-
sematom04.01.2022 23:51
-
Настечок11.04.2020 01:56
-
yoongi201727.09.2022 20:10
-
motya1043207.05.2022 09:33
-
ssarahiss18.12.2022 14:07