Ответы на вопрос:
Program n1; var a,b,c,max,min: real; begin readln(a,b,c); if(a> b) and (a> c) then max: =a; if(b> a) and (b> c) then max: =b; if(c> a) and (c> b) then max: =c; min: =a; if b< min then min: =b; if c< min then min: =c; writeln('разность: ',max-min); end.
Популярно: Информатика
-
аня283829.05.2020 19:13
-
kakaxa623.09.2020 21:35
-
270320009635824628.01.2022 11:24
-
аринка12901.10.2021 01:12
-
LLeNN04.02.2023 20:03
-
rasulid0429.05.2023 10:27
-
oleh0915606.10.2021 10:26
-
ника214431.12.2020 17:03
-
mumuminecraft09.01.2020 23:48
-
AHOHUM332111.01.2020 08:13