Составьте прогрмму,в которойв водится рост 3-их друзей и выводится самвй высокий.
Помогите, пожалуйста)
Ответы
Ответ дал:
0
Program rrr;
Var a,b,c,k: integer;
begin
readln (a,b,c);
if (a>b) and (a>c) then k:=a;
if (b>a) and (b>c) then k:=b;
if (c>a) and (c>b) then k:=c;
writeln (k);
end.
я делала так, но хз что делать если числа будут равны
Var a,b,c,k: integer;
begin
readln (a,b,c);
if (a>b) and (a>c) then k:=a;
if (b>a) and (b>c) then k:=b;
if (c>a) and (c>b) then k:=c;
writeln (k);
end.
я делала так, но хз что делать если числа будут равны
Ответ дал:
0
мммммм
Ответ дал:
0
У тебя такая ава классная
Ответ дал:
0
спс
Похожие вопросы
2 года назад
2 года назад
2 года назад
2 года назад
8 лет назад
8 лет назад
9 лет назад
9 лет назад