var
a : array [1..9] of integer = ((12), (24), (3), (4), (16), (15), (7), (18), (27));
sum, count, i : integer;
begin
sum := 0;
count := 0;
for i := 1 to 9 do
if a[i] > 10 then
begin
inc (count);
inc (sum, a[i]);
end;
writeln ('Таких элементов ', count);
if count > 0 then
begin
writeln ('Их сумма ', sum);
writeln ('Их среднее арифметическое ', sum / count);
end;
end.
64=2⁶ (6 бит на 1 символ)
6*80=480
Ответ: 480 бит
Ж
домашний тел.
звонок в дверь.
3вук будильника
ж
домофон
микровооновка
компьютер
часы
program noname;
uses crt;
var
x,y:real;
begin
clrscr;
write('x='); readln(x);
write('y='); readln(y);
if (x>1) or (x<-1)or (y>1) or (y<-1) then
writeln('no')
else writeln('yes');
readkey;
end.
формальные языки это те, которые придумали люди , но на них они не разговаривают, а используют в своей профессиональной деятельности
поэтому формальными можно считать, например, 1,2,5,6