Язык Pascal. Напишите программу, которая позволяет вводить с клавиатуры 4 числа и выводить на
экран номер наибольшего из них. Числа могут содержать дробную часть, Номер числа в
последовательности - целое число.
Приложения:
![](https://st.uroker.com/files/6bb/6bb006290a55cd461f32f073d75a9b67.jpg)
Ответы
Ответ дал:
1
var i, count:integer;
num, mx:real;
begin
mx:=-1;
for i:=1 to 4 do
begin
readln(num);
if num > mx then
begin
mx := num;
count := i;
end;
end;
write('Наибольшее число ', mx, ', а его номер в последовательности ', count);
end.
Если тебе помог мой ответ, то ты можешь сделать его лучшим)
sokoljul555:
сделаю лучшим, спасибо
Вас заинтересует
1 год назад
1 год назад
1 год назад
7 лет назад
8 лет назад