сервис вопросов и ответовНапишите программу,в которой осуществляется ввод целых чисел (ввод осуществляется до тех пор,пока не будет введён ноль) и определение максимального (наи
5-9 класс|
|
большего) из введёных чисел.Используйте оператор repeat. Решить в паскале.
Gennar
14 марта 2014 г., 17:15:17 (10 лет назад)
Rustamiskakov1
14 марта 2014 г., 20:07:05 (10 лет назад)
Предполагается, что будет введено минимум одно значение.
var
max,a : integer;
begin
readln(a);
max := a;
repeat
readln(a);
if (a > max) and (a <> 0) then
max := a;
until a = 0;
writeln(max);
readln;
end.
P.S. Если понравилось решение не забудь отметить как лучшше. ;)
Ответить
Другие вопросы из категории
Друзья, кто шарит в инфе?
Помогите плиз
Трем логикам предоставили следующий список слов:
ОДА ПАЛ СОР НОС ВАР
* Каждому из логиков назвали только по одной букве, при этом каждый знал только свою букву.
* Логикам сказали, что их три буквы складываются в слово из приведенного списка.
* Когда каждого логика спросили по очереди: «Знаете ли вы какое слово складывается из названных вам букв?», сначала первый ответил «ДА», затем второй ответил «ДА» и потом третий ответил «ДА».
* Каждый из логиков слышал ответ каждого другого.
Какое слово складывается из букв, названных логикам?
Читайте также
ПОМОГИТЕ НАПИСАТЬ ХОТЯ БЫ ОДНУ ЗАДАЧУ НА Pascal ОНИ НЕ СЛОЖНЫЕ , А Я ДАЮ МНОГО ПУНКТОВ!! За 2 лучший ответ! Без плагиата! 1.Написать
программу,используя оператор цикла While,которая будет вводить целые положительные числа не превышающие 100. Найти сумму квадратов чисел 2.Написать программу используя оператор цикла Repeat,которая будет вводить целые числа до тех пор пока не будет введён 0.Подсчитать среднее арифметическое введённых чисел.
Напишите программу,в которой осуществляется ввод целых чисел (ввод осуществляется до тех пор,пока не будет введён ноль) и подсчет суммы и среднего арифм
итического введённых положительных чисел.Используйте оператор repeat.
Напишите программу, в которой осуществляется ввод целых чисел (ввод осуществляется до тех пор, пока не будет введен ноль) и подсчет суммы и среднего
арифметического введенных положительных чисел. Используйте оператор repeat.
Осуществить ввод целых чисел (ввод осуществляется до тех пор,пока не будет введён 0) и подсчитать их сумму и среднее арифметическое введённых
положительных чисел. Использовать оператор repeat.
Цикл с пост условием!! помогите
Написать программу которая будет вводить целые числа до тех пор пока не будетвведён 0. Подсчитать количество положительных и отрицательных чисел.
Вы находитесь на странице вопроса "Напишите программу,в которой осуществляется ввод целых чисел (ввод осуществляется до тех пор,пока не будет введён ноль) и определение максимального (наи", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.