Народ, можете проверить , мне просто качать прогу не , короче хотелось бы что бы на проге geany
вот : даны 3 числа вывести наибольшее и наименьшее
var a,b,c,min,max: integer;
begin
writeln('введите три числа: ');
readln(a,b,c);
max: =a;
if b> max then max: =b;
if c> max then max: =c;
min: =a;
if b
if c
writeln('минимальное: ',min);
writeln('максимальное: ',max);
end.
154
180
Ответы на вопрос:
Популярно: Информатика
-
lyubimuchkaozd15q15.05.2023 05:08
-
nisa8912.03.2022 01:47
-
qwertyuiop34223.02.2020 03:45
-
10alinka0125.10.2022 12:19
-
sofyabelik26.11.2020 15:58
-
znanijanet201714.12.2021 06:35
-
simeika98p0c45h16.12.2022 13:38
-
SankohTew09.03.2022 14:46
-
dreytes22.04.2022 15:43
-
DarinaKimovsk26.04.2023 17:45