Даны n целых чисел. составить программу, которая выводит в ответ только те из них, которые кратны трём, но при этом оканчиваются только на 9. проверка n = 15 2 3 19 39 45 12 999 8 15 10 69 89 199 9 16 ответ 39 999 69 9

216

281

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

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

olyabat

Информатика

4,4(36 оценок)

Pascalabc.net 3.3.5, сборка 1659 от 09.04.2018 внимание! если программа не работает, обновите версию! begin readseqinteger(readinteger('n =')) .where(t-> (t mod 3=0) and (abs(t) mod 10= end. пример n = 15 2 3 19 39 45 12 999 8 15 10 69 89 199 9 16 39 999 69 9

Akikora

Информатика

4,4(1 оценок)

Pascalabc.net var n,a: integer; list: list< integer> : = new list< integer> ; begin write('n='); read(n); for var i: = 1 to n do begin read(a); if (a mod 3 = 0) and (a.('9')) then list.add(a); end; writeln(list); end.