Найти наивеличайшее число с цифрой 3 на конце посреди N задаваемых.

Отыскать наибольшее число с цифрой 3 на конце посреди N задаваемых.

Задать свой вопрос
1 ответ
2
3
4
5
6
7
8
9
10
11
12
var
m, max: Integer;
begin
WriteLn('Введите последовательность целых чисел, оканчивающуюся нулём');
Read(max);
repeat
Read(m);
if m=0 then Break
else if max until False;
WriteLn('Max = ',max);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт