// 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
Это блок схема
Таблица-
1 взять карандаш
2 взять линейку
И т.д
Список- взять ручку
Взять блокнот
И т.д
Выводятся такие значиния
k= 1 p=120
j=10 s= 20 j=11 s= 42 j=12 s= 66 j=13 s= 92 j=14 s= 120 j=15 s= 150
1 дюйм = 2,54 см
7,62 см * 7,62 см = 3 дюйма * 3 дюйма
Количество точек сканированного изображения = 1200*1200*3*3
32 бита = 32/8 байт = 4 байта
Объем изображения = 1200*1200*3*3*4 байт = 1200*1200*3*3*4/1024 Кбайт = 50625 Кбайт = 50625/1024 Мбайт ≈ 50 Мбайт
Полностью не уверена, но, скорее всего, только одна программа. Т.к. при приобразовании числа 35 в 37 мы имеет право использовать только первую команду (использовав вторую полнучиться слишком большле число, которое мы уже не сможем уменьшить другой командой).