Ответ: Нету вариантов
Объяснение:
Код программы:
var a, b, c, max:integer;
begin
writeln('Введите 1 число');
readln(a);
writeln('Введите 2 число');
readln(b);
writeln('Введите 3 число');
readln(c);
if a > b then begin
if a > c then
max := a
else
max := c;
end
if b > c then
max:=b
writeln('Максимальное число: ', max);
end.
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ: Нету вариантов
Объяснение:
Код программы:
var a, b, c, max:integer;
begin
writeln('Введите 1 число');
readln(a);
writeln('Введите 2 число');
readln(b);
writeln('Введите 3 число');
readln(c);
if a > b then begin
if a > c then
max := a
else
max := c;
end
else
if b > c then
max:=b
else
max := c;
writeln('Максимальное число: ', max);
end.