Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
vara,b: integer; c: real; beginwriteln ('введите 1 число'); read (a); writeln ('введите 2 число'); read (b); c: =(a/1)/(1/b); writeln (c); end.
только 25-18=7 человек
только французский 27 - 18 = 9 человек
ну а на вопросы не отвечу =))
на паскале:
program myprogram; var n,i,fact: integer; sum: real; beginsum: =0; fact: =1; writeln('введите число n.'); readln(n); for i: =1 to n dobeginfact: =fact*i; sum: =sum+1/fact; end; writeln('сумма 1/1! +1/2! +1/3! ++1/n = ',sum); end.
один символ - один байт, значит надо кол-во бит поделить на 8:
24576 /8 = 3072 символа
Популярные вопросы