Тюльпан это такой провод, а точнее три в одном ну там красный,жёлтый и белый.
Это что за шифр?log без параметров не используется
1.
var
c: char;
a: string;
i: integer;
begin
writeln('Введите строку a:');
readln(a);
writeln('Введите символ с:');
readln(c);
for i:=length(a) downto 1 do
if a[i] = c then delete(a, i, 1);
writeln(a);
<span>end.
2.
var
b: string;
i, b1, b2: integer;
begin
writeln('Введите строку b:');
readln(b);
b1 := 0; b2 := 0;
for i:=1 to length(b) do
begin
if b[i] = '!' then inc(b1);
if b[i] = '?' then inc(b2);
end;
writeln('Восклицательных знаков: ', b1);
writeln('Вопросительных знаков: ', b2);
<span>end.</span></span>
Струйный, лазерный,матричный,цепной,барабанный
12 страниц * 48 строк * 32 символа * 8 бит = 147456 бит
147456 бит / 8 / 1024 = 18 Кбайт