// PascalABC.NET 3.3
begin
var a:=ReadSeqIntegerWhile(x->x<>0).ToArray;
Print(a.Count,a.Where(x->(x mod 2<>0)and(x mod 3=0)).Count);
end.
Пример:
20 87 15 46 61 0
5 2
Какие предложения? Напиши по подробнее
Известна сторона равностороннего треугольника найти высоту и площадь этого треугольника, в QBasic
Оперативная память. Именно тут хранится вся информация о работе, пока компьютер включен. Не путайте с Жестким Диском. На Жестком диске хранится долговременная информация.