Статья, набранная на компьютере, содержит 16 страниц, на каждой странице 35 строк, в каждой строке 64 символа. определите информационный объём статьи в кодировке windows1251, в которой каждый символ кодируется 8 битами. 1) 280 байт 2) 28 кбайт 3) 560 байт 4) 35 кбайт

1

a)

program pr;

var

s: string;

c: char;

i: integer;

begin

writeln('введите имя и фамилию в одной строке');

readln (s);

writeln('введите заданный символ');

readln (c);

for i: =1 to length(s) do if s[i]=c then writeln ('в строке найден заданный символ');

readln;

end.

б)

program pr;

var

s,n: string;

c: char;

i: integer;

begin

writeln('введите имя и фамилию в одной строке');

readln (s);

i: =1;

while s[i]< > ' ' do i: =i+1;

n: =copy(s,1,i-1);

writeln(n);

readln;

end.

в)

program pr;

var

s,n,f: string;

c: char;

i: integer;

begin

writeln('введите имя и фамилию в одной строке');

readln (s);

i: =1;

while s[i]< > ' ' do i: =i+1;

n: =copy(s,1,i-1);

f: =copy(s,i+1,length(s)-i+1);

writeln(n);

writeln(f);

readln;

end.

program pr;

var s: string;

begin

s: ='касіу ясь канюшыну';

delete (s,7,3);

insert ('ясь',s,7);

writeln (s);

readln;

end.

3

а)

program pr;

var

s: string;

begin

s: ='реки горы и болота';

delete (s,6,5); {удаляем включая пробел}

writeln (s);

readln;

end.

б)

program pr;

var

s: string;

begin

s: ='реки горы и болота';

delete(s,13,6);

s: =s+'озера';

writeln (s);

readln;

end.

    1 способ                                             2 способ

х чаек - на первом острове                 х чаек - на первом острове

у чаек - на втором острове                   79-х чаек - на втором острове

х+у=79               х+у=79                         х-15-12=79-х+12

х-15-12=у+12     х-у=39                          2х=118

                        2х=118                           х=59

                        х=59                               79-59=20

                        у=20

ответ: на первом острове 59 чаек, на втором - 20 чаек.