Дана последовательность целых чисел оканчивающихся нулём. Написать программу находящее...

Question

Дана последовательность целых чисел оканчивающихся нулём. Написать программу находящее самое большое число из всех чисел в последовательности. Программа для PascalABC

Comments

Паскаль?

---

Да

Answer 1

Var
A,M:integer;
Begin
WriteLn('Введите последовательность целых чисел');
M:=0;
Repeat
Read(A);
if A>M then M:=A;
Until A=0;
WriteLn(M)
End.

Comments

Что такое Юнтил?

---

Циклы проходили?

---

Не знаю, я в 6 классе, мы через вайл делали

---

For - с параметром. While do - с предусловием. Repeat Until - с пост условием - это но объяснять?

---

Спасибо! Я понял.