var
a,n,min:integer;
begin
readln(a);
n:=1;
min:=100;
if (a mod 3 <>0) or (a=0) then
begin
writeln('Net par');
exit;
end
else
begin
n:=a;
repeat
readln(a);
if a mod 3 <> 0 then break;
n:=n*a;
if (n<min) then min:=n;
n:=a;
until (a mod 3 <> 0) or (a=0);
end;
writeln;
if min = 100 then writeln('Net par') else
writeln(Min);
end.
1.
Даные, програмы, работа
2.
а.)
2строка
б.)
2строка
1. візуальний. тестові
2. візуальний. графічні
3.візуальні. текстові
4. візуальні. тестові, числові
5.аудіальні. звукові
6.
1 символ = 8 бит = 1 байт
150*40*60=360000 (символов/байт)
это ответ и есть, но можно для удобства перевести в килобайты
1 килобайт = 1024 байт
360000/1024=351,5625
Ответ: 360000 байт или 351,5625 килобайт