Ответы на вопрос:
program znanija;
var
a,b,c: real;
begin
writeln('введите три числа');
readln(a,b,c);
if ((a> c) and (c> b))or ((a> b) and (b> c)) then
writeln('максимальное число ',a);
if ((c> a) and (a> b))or ((c> b) and (b>
a)) then
writeln('максимальное число ',c);
if ((b> a) and (a> c))or ((b> c) and (c> a)) then
writeln('максимальное число ',b);
end.
Популярно: Информатика
-
samira231424.04.2021 09:55
-
funtic2029.05.2020 13:16
-
dalikha0607.12.2022 09:48
-
истоиия15.07.2022 19:02
-
smirnovigor10.02.2020 19:40
-
ogbondarenko29.10.2022 06:59
-
squarenq01.06.2020 18:18
-
feroprosto06.11.2022 22:21
-
Katya12435427.05.2023 06:43
-
ASM23530.03.2020 23:09