Var
a,b,c,d:integer;
begin
c:=1;
b:=0;
while a<>1 do begin
readln(a);
if a mod 2 <> 0 then begin
b:=b+1;
if b<=10 then c:=c+a;
end;
c:=c*a;
end;
writeln(b,' ',c);
end.
Ответ:
A) 320 бит
Объяснение:
1) 2 байта * 20 символов = 40 байт;
2) 1 байт = 8 бит;
3) 40 * 8 = 320;
невозможно выполнить
x*y*z = P
x+y+z = S
Система имеет два уравнения и три неизвесных, а значит не решается до конца
Если убрать во writeln лишнюю закрывающую скобку, то на экране будет выведено
n=6p=96
76 символов. Считая пробелы. Это тоже символы