Определение максимального (наибольшего) из введённых чисел

@Vlad1234 · Регистрация: 27.02.2015

Студворк — интернет-сервис помощи студентам

Напишите программу, в которой осуществляется ввод целых чисел (ввод осуществляется до тех пор, пока не будет введён ноль) и определение максимального (наибольшего) из введённых чисел. Используйте оператор repeat. Решить в паскале.

@APALoff · 27.02.2015, 16:20

Pascal

Max:=0;
Repeat
  Readln(n);
  If n>Max then Max:=n;
Until n=0;

@Vlad1234 0 / 0 / 0 Регистрация: 27.02.2015 Сообщений: 4
		1
	Определение максимального (наибольшего) из введённых чисел 27.02.2015, 15:28. Показов 4572. Ответов 1 Метки нет (Все метки) Напишите программу, в которой осуществляется ввод целых чисел (ввод осуществляется до тех пор, пока не будет введён ноль) и определение максимального (наибольшего) из введённых чисел. Используйте оператор repeat. Решить в паскале. 0

Опции темы

Определение максимального (наибольшего) из введённых чисел

Решение