Var a:integer;
begin
writeln ('a=');
readln(a);
if a mod 5=0 then writeln ('Yes ',a/5) else writeln('NO ', 5*a);
readln;
<span>end</span>
Определение четного числа из a и b.
Подсчитаем количество символов: 159*50*60=381600 символов
Переведем байты в биты: 333900*8=2671200 бит
"Вес" 1 символа =2671200 бит/381600 символов =7 бит
Мощность алфавита считается так: N=2^i, где N - мощность, i - "вес" 1 символа в битах
N=2^7=128
//fromStudent
var
n : byte;
function f (p:byte):real;
var i, j : byte;
sum, lsum : real;
begin
sum:=1;
for i:=1 to p do
begin
lsum:=1;
for j:=1 to i do lsum:=lsum*(1+1/i);
sum:=sum*lsum;
end;
f:=sum;
end;
begin
readln (n);
write (f(n));
end.
1) противоположное от слова специализированный, т.е. инструмент широкого спектра
2) потому что инструмент широкого спектра для обработки разнообразной информации. Кстати наш мозг еще более универсальный инфструмент в этом смысле
3) смотреть фильмы, серфинг по интернету
4) числовая - калькулятор, маткад, эксель
текстовая - блокнот, ворд
графика - Фотошоп, корэл дро