Напишите программу,которая в последовательности натуральных чисел определяет наибольшее число,кратное 3 и оканчивающееся на 6. программа получает на вход количество чисел в последовательности, а затем сами числа.введенные числа не превышают 30000.

250

428

Посмотреть ответы 2

Ответы на вопрос:

7Kamilla

Информатика

4,7(34 оценок)

Varn,a,i,max: integer; beginwriteln('vvedite kol-vo chisel n'); readln(n); max: =0; for i: =1 to n dobeginwriteln('vvedite ',i,' chislo'); readln(a); if a < 30000 thenif (a mod 3 = 0) and (a mod 10 = 6)thenif max < a thenmax: =a; end; writeln('max=',max); end.