Максимум из 3-х чисел Даны 3 целых различных числа. Нужно определить, которое из них самое большое. Input Со стандартного устройства ввода вводится через пробел 3 целых числа, не превосходящих по модулю 10000. Output Нужно в...
Максимум из
3-х чисел
Даны 3 целых различных числа. Нужно определить, которое
из них самое большое.
Input
Со стандартного устройства ввода
вводится через пробел 3 целых числа, не превосходящих по модулю 10000.
Output
Нужно выдать на стандартное
устройство вывода через пробел ответ в следующем формате:
“First number is maximal”
“Second number is maximal”
“Third number is maximal”
В циклах с пред и пост условием или цикл с параметром
Гость
Ответ(ы) на вопрос:
ГостьVar
a,b,i,c:integer;
begin
read(a);
read(b);
read(c);
for i:=0 to 1 do begin
I:=1;
if a>b then
if a>c then writeln(1) else writeln(3)
else if b>c then writeln(2) else writeln(3); end;
end.
P.S. В скобках номер числа
ГостьИлья Черезов,красава! Я тоже с тебя спишу)
Не нашли ответ?
Похожие вопросы