Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
didar6
01.10.2020 18:48 •
Информатика
Напишите программу в которой осуществляется ввод целых чисел ввод осуществляется до тех пор пока не будет введен 0 и определение максимального числа наибольшее сведенных чисел используется оператор repeat
Ответ:
kodwaw
03.10.2020 08:25
Var a, max: integer;
begin
read(a);
max:=a;
repeat
read(a);
If a>max then max:=a;
until a<>0;
writeln(max);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Onishykmaksim
30.03.2021 15:33
Является ли условным оператором следующая последовательность символов? if x 16 then y:=x+16 else y:=x-16...
Udjfjwojzksnsnsnslkm
26.02.2021 08:46
Дан фрагмент программы: int j = 1; for( int i=0; i if( A[i] == A[j] ) j = i; При каком условии после выполнения этого фрагмента получится j = 0? j = 3? j = N – 1?...
sobkevichbozhep08t40
05.08.2021 14:16
Задача 8 классаУ гусей и кролей вместе 64 лапы. Сколько может быть кролей и сколько гусей (вывести все возможные варианты)? Программа на С++...
ankerkor
17.12.2020 21:13
Очень нужно, Как найти ответы на олимпиады с сайта «На урок»?...
kudadiana3101
14.07.2021 06:43
16. Пусть а и b - целые переменные. Что будет выведено в результате работы фрагмента программы: а) а=5 ; b=3 print (a, , b, ! ) ответ: b)a = 5; b=3 print ( a , b! ) ответ: в)...
natalirm
16.05.2022 06:24
Как называется блок синего цвета?...
20022013настя
20.01.2023 18:53
Спишите предложения с прямой речью из произведения паустовского расставляя недостающие знаки препинания 1. молодость говорила бабушка имеет свои законы. не моё дело в них вмешиваться....
Qweyudbdbf
20.01.2023 18:53
Согласны и вы с утверждением: современные подростки стали менее при к жизни ?...
chuko
20.01.2023 18:53
Мне по заранее огромное массу смеси, состоящей из 2,24 л. (на) со2 и 4,48 л. (н.в.) о2...
Nicky133
20.01.2023 18:53
Подберите к данным существительным как можно больше определений долина (какая) город(какой) фонтаны(какие) озеро(какое) школа(какая) виноград(какой) персики(какие)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
read(a);
max:=a;
repeat
read(a);
If a>max then max:=a;
until a<>0;
writeln(max);
end.