Question

СРОЧНО!!!!
Решите в программе паскаль
Напишите программу, которая в последовательности 3 натуральных
произвольных чисел определяет минимальное число. Введенные числа не
должны превышать 250.

Answer 1

Ответ:min:=0;

for i:=1 to n do

readln(x);

if (min = 0) and (x mod 3 = 0) then

min:=x

else if (x < min) and (x mod 3 = 0) then

min:=x;

Объяснение: