Данное высказывание равносильно следующему:
"первая гласная И вторая согласная" - этому удовлетворяет только а)
Var b:integer;
a: array [0..6] of integer;
begin
randomize;
for b:=0 to 6 do begin
read(a[b]);
end;
for b:=6 downto 5 do begin
write(a[b],' ');
end;
writeln('');
for b:=0 to 4 do begin
write(a[b],' ');
end;
writeln('');
end.
256=2⁸, следовательно для кодирования 1 символа требуется 8 бит= 1 байт
15*32*64= 30720 символов содержит текст
30720*1 байт = 30720байт
1)
цел a, b, c
алг
нач
ввод a,b,c
если mod(a+b,2)=0 то
вывод (a+b)/c
иначе
вывод (a+b)*c
все
кон
2)
цел a,d1,d2
алг
нач
ввод a
если (a>9) и (a<99) то
d1:=div(a,10);
d2:=mod(a,10);
вывод d1*d2
вывод' '
вывод d1+d2
вывод' '
вывод d1-d2
иначе
вывод 'ошибка'
все
кон