На разобранную в классе на нахождение максимальной цифры числа с использованием цикла с предусловием while тем, кто в классе не смог зайти в свой аккаунт на ideone.com и там ее выполнить, а писал код в тетради, сделать это дома и написать через сайт в своем аккаунте программу, которая ищет минимальную цифру числа.

=

Объяснение:

const

 nmax=100;

type

 Tarr=array[1..nmax] of integer;

var

 a:Tarr;

 i,n:integer;

begin

 randomize;

 repeat

   write('Razmer massiva, ne bolee ',nmax,': ');

   readln(n);

 until n in [1..nmax];

 writeln('Ishodniy massiv:');

 for i:=1 to n do

   begin

     a[i]:=random(50);

     write(a[i]:4);

   end;

 writeln;

 i:=1;

 while (i<=n) and (a[i] mod 5<>0) do

   inc(i);

 if i>n then

   writeln('Net elementov kratyh 5')

 else  

   begin

     a[i]:=0;

     writeln('Poluchenniy massiv:');

     for i:=1 to n do

       write(a[i]:4);

     writeln;

   end;

end.

Возможный вариант в C++
#include <iostream>
int main()
{
    using namespace std;
    int N;
    cout << "Enter N: ";
    cin >> N;
    int num;
    int max = 1;
    int i;
    for (i = 0; i < N; ++i)
    {
        cout << "Enter #" << i + 1 << " number: ";
        cin >> num;
        if ((num - 9) % 10 != 0 && num % 3 == 0)
        {
            max = num;
            break;
        }
    }
    for (int j = i + 1; j < N; ++j)
    {
        cout << "Enter #" << j + 1 << " number: ";
        cin >> num;
        if ((num - 9) % 10 != 0 && num % 3 == 0)
            if (num > max)
                max = num;
    }
    if (max != 1)
        cout << "Max number div by 3 and don't end 9: " << max << endl;
    else
        cout << "No numbers div by 3 and don't end 9" << endl;
    return 0;
}