Выделяешь поля, из которых нужно вычислить средний бал, жмякаешь на выделенную синим цветом кнопочку и выбираешь СРЗНАЧ, жмякаешь ОК)
1250/10=125 Кбайт в секунду
2^3= 8 подъездов (один вариант из 8)
64 символов в алфавите следовательно 1 символ весит 6 бит, 100*6=600 битов/8= 75 байт
Var
a, b, i, k: integer;
begin
readln(a, b);
for i := a to b do
if i mod (7 * 2) = 0 then
begin
k := k + 1;
writeln(i);
end;
writeln('K = ', k);
end.
Девушка потратила в магазине 1458.04 рубля