Вычислите 55 div 7 + 44 mod 5 =

не одновременно, а сначала alt и только потом 3 (на цифровой клавиатуре - справа)

program summa;

uses crt;

var  i : integer; sum: real; beginsum: =0; for i: =1 to 20 do beginsum: =sum+ sqr(i); end; writeln('summa =', sum); end.

вот тебе программа на паскале . она находит сумму квадратов всех натуральных чисел от 1 до 20. вот блок схема. блок схему скину на мыло. напиши мне его и я тебе скину

смотрите тут что дано.

26 лат букв и десятичные цифры т.е от 0 до 9 итого 10,мы все складываем получаем 36 различных символов,потом находим от этого числа кол-во информации по формуле i=log по основанию 2 от числа,в нашем случае от 36,результат всегда округляется к большему,т.е. 2^5 =32,не хватает а в 2^6=64,но так как округляем к большему,то берем 6 и у нас получаетс 6 бит кол-во информации,потом умножаем 6 на кол-во символов,в данном случае на 8 и получаем 48 бит,в условии сказано что мы должны узнать сколько байт необходимо для хранения 30 номеров,пожтому переводи биты в байты,т.е. 48/8=6 байт,почему именно на 8, потому что в 1 байте - 8 бит,

получив 6 байт умножаем на 30 номеров получаем в итоге 180 байт.

ответ: 180 байт

var n,i: byte; p,s,r: real;

begins: =0; p: =1; write('введите n = '); readln(n); for i: =1 to n do beginreadln(r); s: =s+r; p: =p*r; end; writeln('cумма всех чисел s = ',s: 0: 4); writeln('произведение всех чисел p = ',p: 0: 4); writeln('cреднее арифметическое = ',(s/n): 0: 4); end.