Надо написать программу в паскале. : введите три трёхзначных числа. найти разность между наибольшим м наименьшим. заранее !
149
487
Ответы на вопрос:
Begin var a, b, c: single; readln(a, b, c); writeln( max(a, max(b, c)) - min(a, min(b, ; end.позязя, begin var a, b, c, d, e: single; readln(a, b, c); if (a < b) then d : = a else d : = b; if (c < d) then d : = c; if (a > b) then e : = a else e : = b; if (c > e) then e : = c; writeln(e - d); end.
Популярно: Информатика
-
иляяя1яяя11.05.2023 08:13
-
rdemchenko03.04.2023 15:01
-
елена121005.03.2021 23:35
-
kristinka7507.05.2020 14:45
-
lexus56ru27.07.2020 19:27
-
ponomarevaaaaaaaaaa10.08.2022 12:40
-
marcella611200014.09.2020 23:28
-
pyataevadasha11.05.2023 15:45
-
mkm316.09.2020 23:13
-
oleninaonii15.03.2022 08:54