Плесс. на языке паскаля. напишите программу,которая - вопрос №7220913 от sashamaslak 24.12.2022 12:16

Question

Информатика: Плесс. на языке паскаля. напишите программу,которая в последовательности натуральных чисел определяет минимальное,оканчивающееся на 2. программа получает числа. признак окончания ввода 0. количество чисел не превышает 1000. введенные числа не превышают 30000. программа должна вывести одно число - минимальное,оканчивающееся на 2,если таких нет,вывести на экран об этом сообщение.

sashamaslak · Answer

VarA,m:integer;Beginm:=32767;RepeatRead(A);if (A mod 10 = 2)and(A m) then m:=A;Until A=0;if m mod 2 = 0 then WriteLn(m)else WriteLn( Чисел, оканчивающихся двойкой нет. )End....