Помогите! Дана последовательность чисел, которая оканчивается на 0. Найдите наименьшее число, которое оканчивается на 5.
заранее спасибо)
очень надо, сразу говорю)
программа: Pascal ABC . net

Если вы это сможете потом это сделать, то объясните, я у вас поучусь

ну сначала самое первое число присвоим(первое А,которое оканчивается на 5), затем уже их сравним- число мин меньше, чем А( чем новое А), то мы оставляем его минимумом. если же А новое меньше, чем минимум - тогда присваиваем ему новое значение.

Отлично! у вас есть каркас программы, дальше можете экспериментировать.

я у вас помощи хотел попросить)) в информатике плохо шарю, а с остальными предметами все отлтчно(

Добрый день! я смог улучить программу!

1.Как я понял, последовательность вводится с клавиатуры и признак окончания ввода - 0. Значит имеет смысл использовать цикл Repeat2. Вводимые числа - целые.После этих уточнений можно написать код на PascalABC://Вариант с циклом repeatvar  a, min: integer;begin  min := 555555;  repeat    readln(a);    if ((a mod 10 = 5) or (a mod 10 = -5)) and (a < min) then       min := a;  until a = 0;   writeln(min);end.//вариант с циклом whilevar  a, min: integer;begin  min := 555555;    readln(a);    while (a>0) or (a<0) do begin    if ((a mod 10 = 5) or (a mod 10 = -5)) and (a < min) then       min := a;      readln(a);   end;     writeln(min);end.