Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
pascal:
program strings;
uses crt;
var i,open,close: integer;
a: string;
begin
open: =0;
end: =0;
clrscr;
write('введите строку: '); readln(a);
for i: =1 to length(a) do
if a[i]='(' then open: =open+1;
if a[i]=')' then close: =close+1;
end;
writeln('открывающихся скобок: ', open, ' штук');
writeln('закрывающихся скобок: ', close, ' штук');
readln;
end.
290*39*67=757770 - всего символов
для кодирования 757770 символов потребуется 757770 байтов
757770байт < 1,44 мбайт
да, книга поместиться на дискетку
a = sqrt((x1-x2)*(x1-x2)+(y1-y2)*(y1-y2));
b = sqrt((x3-x2)*(x3-x2)+(y3-y2)*(y3-y2));
c = sqrt((x1-x3)*(x1-x3)+(y1-y3)*(y1-y3));
writeln("периметр = ",a+b+c);
s = {формула герона}
8 битная кодировка => 1 символ занимает 8 бит.
2304*4 = 9216 символов на всех 4 страницах
9216*8 = 73728 бит занимают все страницы
73728/ 36.864 = 2 секунды
ответ: 2 секунды
Популярные вопросы