Написать программу: подсчитать сумму двузначных четных чисел в диапазоне заданном пользователем. используя оператор !

291

443

Посмотреть ответы 2

Ответы на вопрос:

кошечка545

Информатика

4,4(16 оценок)

Для наглядности и простоты проверки оставил вывод слагаемых: var s,a,b: integer; begin writeln('сумма нечётных двузначных чисел в [a,b]'); write('a = '); readln(a); write('b = '); readln(b); s: =0; if a mod 2 = 0 then a: =a+1; if a < -10 then begin if a < -99 then a: =-99; repeat s: =s+a; writeln(a); a: =a+2; until (a> -11)or(a> b); a: =11; end; if (b> 10)and(a< 100) then repeat s: =s+a; writeln(a); a: =a+2; until (a> 99)or(a> b); writeln('s = ',s) end.

Mausssslaaaa

Информатика

4,8(70 оценок)

По формуле , где n - кол-во символов в алфавите, i - объём информации в одном символе. получаем . значит i=2, т.е. каждый символ равен 2 битам. 30 строк*70 символов в строке= 2100 символов на странице 2100 символов*5 страниц=10500 всего символов далее нужно умножить общее кол-во символов на 2 бита 10500*2=21000 далее переводим из битов в байты 21000/8=2625 байт ответ: 2625 байт