Составить программу на PASCAL abc нахождение наибольшего из 4 чисел

Ответы

Ответ дал: Giammy
0
var a,b,c,d:integer;
begin
write('a,b,c,d->'); read(a,b,c,d);
if a<b then a:=b;
if c<d then c:=d;
if a>c then Writeln(a) else Write(c);
end.
Ответ дал: zxzxcvcv2012
0
Можешь написать где что поставить. Сорян что туплю, просто в паскале у меня жопа(
Ответ дал: Giammy
0
всмысле где что поставить? просто копируете код в ваш компилятор
Ответ дал: zxzxcvcv2012
0
надо было вместо ('a,b,c,d->') ввести: 4 числа( мне 3 поставили. Но все равно, спасибо. Так бы двойку влепили.
Похожие вопросы