Плоский и красивый на столе лежит, подумает, подумает и копию родит.

255

338

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

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

PolinaT11

Информатика

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

Ксерокс прибор,делающий копии

зика23

Информатика

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

1) //pascalabc.net версия 3.2, сборка 1389 //если программа не запускается, то обновите версию begin var a : = arrrandominteger(20, 100, 200); println(a); var k : = a.count(x -> x mod 10 = 5); writeln((k = 0) ? 'таких чисел нет' : k.; end. 2) //pascalabc.net версия 3.2, сборка 1389 //если программа не запускается, то обновите версию begin var a : = arrrandominteger(40, -100, 100); println(a); var max : = a.count(x -> x mod 3 = 0); if max < > 0 then max : = a.where(x -> x mod 3 = 0).max; writeln((max = 0) ? 'таких чисел нет' : max.; end.