Вопрос ** 20 баллов!!!!! Надо написать программу ** языке паскаль, где надо ввести 5...

Question

Вопрос на 20 баллов!!!!! Надо написать программу на языке паскаль, где надо ввести 5 любых чисел и программа покажет какое йз них наибольшее. Зарание спасибо)

Answer 1

Var a,i,max:integer;
begin
max:=-30000;
  for i:=1 to 5 do begin
     readln(a);
     if a>max then max:=a;
  end;
  writeln('Максимальное  - ', max);
end.

Comments

а она на 5 переменных?

---

Переменная одна, только в цикле она 5 раз меняет значение

---

так там надо 5 разных переменных

---

которые ты самм ввеодишь

---

но я прогу плпробую

---

Тогда формулировка задачи должна быть другая

---

сделаешь плиз)

---

Вы поймите, что преподаватель от вас хочет получить программу, которая находит максимальное из пяти введенных значений, а не из 5 переменных.

---

Внимательно читайте условие

---

ок