tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Вводится последовательность чисел
Вводится последовательность чисел конец последовательности -0 найти максимальное число. паскаль абс
Nichisniuk2017
2 14.08.2019 13:20
1
Ответы
DragaoMad
04.10.2020 18:50
Var a,max:integer;
begin
write('a='); readln(a);
max:=a;
while a<>0 do begin
if a>max then max:=a;
write('a='); readln(a);
end;
writeln('max = ',max);
end.
Пример:
a=25
a=84
a=26
a=17
a=80
a=51
a=0
max = 84
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
66Egor99
24.09.2019 12:10
Дан массив из 11 случайных чисел на интервале [-10; 10]. : сдвинуть элементы массива на одна позицию вправо. полностью программу, желательно...
190520041
28.11.2020 16:58
На С С for. Дано 4 числа: a, b, c, d. Найдите разностьмежду суммой всех чисел в интервалеа; b) и суммой всех чисел в интервале(с; d)....
ромкапомка1
29.08.2019 20:00
1. выберите правильный ответ из предложенных вариантов. что такое компьютерный вирус? 1) прикладная программа. 2) системная программа. 3) программы, которые могут «размножаться»...
darina224
29.08.2019 20:00
Составить программу по функции: p=b-c^2...
Gkdm
06.06.2019 14:10
Впиши числа в пустых клеточках. придумай похожее правило и впиши в клетки второй ряд чисел, начиная с числа 2. 6 8 7 9 8 10 9 _ _ 12 2 _ _ _ _ _ _ _ _ _ _...
karinademina8
06.06.2019 14:10
Решить наряд игрушечного медвежонка гоши состоит из куртки и кепки. у него есть три куртки - голубая, розовая и фиолетовая, а также две кепки - золотистая и в горошек. сколько...
Какфундик
06.06.2019 14:10
Найди такое общее окончание для этих букв,чтобы получилось слово...
7klassnik1
06.06.2019 14:10
Дана строка ,определяющая запись формулы.написать программу определяющею открывающихся и закрывающихся скобок....
2000120
06.06.2019 14:10
Написать программу в паскале. найти сумму и количество чисел кратных 2, на промежутке от 2 до 15. я вообще не знаю как писать. можете подробно все расписать по строкам, со всеми...
sysfzd
06.06.2019 14:20
Cоставить программу вычисления значений функций f(x) на отрезке a; b с шагом h. результат представить в виде таблицы , первый столбец которой - значения аргумента, второй - соответствующие...
Популярные вопросы
Какой корень у прилагательных,тенистая аллея, медовый пряник, носовой платок,...
1
Длина прямоугольника9 да,ширина 8 дм. найдите его площадь периметр...
3
Из 300 автомобилей, проданных автосалоном, 36 оказались двухдверными, а остальные...
3
Что означает выражение как две капли воды подходили они друг на друга всем...
3
Периметр квадрата равен 60 см найти сторону и площадь квадрата...
1
Запишите частное в виде дроби: 3: 10, 16: 25...
1
Восновании пирамиды sabc лежит правильный треугольник abc со стороной 2,а боковое...
3
Составь из слов предложения и запиши получившийся текст. расставь нужные знаки...
3
Составить уравнения реакций нейтрализации, с которых можно получить следующие...
3
Написати твір на тему what music do like? would you like to play any musical...
2
begin
write('a='); readln(a);
max:=a;
while a<>0 do begin
if a>max then max:=a;
write('a='); readln(a);
end;
writeln('max = ',max);
end.
Пример:
a=25
a=84
a=26
a=17
a=80
a=51
a=0
max = 84