Дана последовательность целых чисел оканчивающихся нулём. написать программу находящее самое большое число из всех чисел в последовательности. программа для pascalabc
superschool1
1
25.08.2019 01:20
0
Другие вопросы по теме Информатика
Katerina48russia
25.05.2020 10:20
alex1439
28.05.2019 21:30
Duxa22
28.05.2019 21:30
Алина06072003
28.05.2019 21:30
potehin30
28.05.2019 21:30
LegPug
19.05.2021 15:42
zanunkyk
19.05.2021 15:44
lenaseredenko
22.08.2019 04:00
Популярные вопросы
- Не выполняя построения ответьте на вопрос принадлежит ли графику функцый y=квадратный...
3 - Определите типы стеблей растений .какие из них прямостоячие,стелющиеся,вьющиеся,лазящие,:...
1 - Три поросёнка живут в 3 разных домах. известно что наф наф не живёт в соломенном...
3 - Привидите примеры предложений с метонимией со словами : рояль,или концерт,или...
1 - Современный язык - это сложное единство языка, диалектов, просторечия. определите...
3 - Написать про давний киев на украинском...
3 - Запишите в виде выражения произведение числа х и суммы чисел а и с...
2 - Кокда была изобретена помпа,фотоапарат...
2 - План к сказке золушка ,напишите : )...
3 - 1)составьте уранение реакции присоединения брома к бутину.назовите образующееся...
3
A,M:integer;
Begin
WriteLn('Введите последовательность целых чисел');
M:=0;
Repeat
Read(A);
if A>M then M:=A;
Until A=0;
WriteLn(M)
End.