Адам және робот эссе жазу​

program pr;

var mas: array[1..40] of integer;

i, sum: integer;

begin

randomize;

for i: =1 to 40 do mas[i]: =random(20);

for i: =1 to 40 do if mas[i]< =10 then sum: =sum+mas[i];

writeln ('сумма равна ', sum);

readln;

end.

программу проверил все работает

1)

высказывание   не (не  а  и  b)  будет ложным когда высказывание

(не  а  и  b)   будет истинным, оно в свою очередь будет истинным когда

будут истинны одновременно высказывание  не  а  и   высказывание  b

то есть когда а ложное а в истинное

2)

число 376 трехзначное и четное

а=число 376 трехзначное

в=число 376 четное

а и в

или

если сумма цифр числа делится на 3, то число делится  на  3

а=сумма цифр числа делится на 3

в=число делится  на  3

если а то в

x2: =x*x

x4: =x2*x2

t: =x4*x4 | =x^8

t: =t*x2|=x^10

t: =t*t

t: =t/x  |=x^15

t: =t*x4 |=x^19

по сути простенькая.

v=u*t

объем = скорости передачи умноженная на время

v= 7680*90 (90сек=1.5 мин. секунды это система си)

v= 691200бит

v одного символа 16бит, а всего 400 символов на странице => вес страницы равен 16*400=6400 бит

чтобы найти количество страниц надо общий объем поделить на объем одной страницы.

691200/6400=108

ответ: всего было передано 108 страниц.