Написать программу нахождения наиболее наибольшего из трех чисел 
PASCAL

Ответы

Ответ дал: kage1998
0
program chik;
var a,b,c,min:real;
begin
read(a,b,c);
min:=a;
if(b>min)then min:=b;
if(c>min)then min:=c;
writeln(min);
end.
Ответ дал: marsmag
0
program chisla;
var a,b,c,max:real;
begin
readln(a,b,c);
if (a>b) and (a>c) then max:=a;
if (a<b) and (b>c) then max:=b
if (a<c) and (b<c) then max:=c;
writeln(max);
end.
Ответ дал: kage1998
0
да-да я согласен
Ответ дал: kage1998
0
вот теперь правильно
Ответ дал: marsmag
0
да
Ответ дал: marsmag
0
у нас программирование в курсе нет, но я сдаю ЕГЭ учусь до строк дошел
Ответ дал: marsmag
0
оно же проходиться с 8 по 9 класс
Похожие вопросы