Домашнее задание:
Ввести три числа и найти наибольшее из них.
Пример:
Введите три числа:
4 15 9
Наибольшее число 15
Ответы
Ответ дал:
0
Для типа integer
Program n_1;
var x,y,z:integer;
begin
writeln('Введите 3 числа:');
read(x, y, z);
if y>x then x:=y;
if z>x then x:=z;
writeln('Наибольшее число: ',x);
end.
Для типа real
Program n_1;
var x,y,z:real;
begin
writeln('Введите 3 числа:');
read(x, y, z);
if y>x then x:=y;
if z>x then x:=z;
writeln('Наибольшее число: ',x:0:5);
end.
Вас заинтересует
1 год назад
1 год назад
1 год назад
7 лет назад
8 лет назад