Program vozrast1;
var a,b:integer;
begin
write ('введите ваш возраст');
readln(a);
if a>=18 then write ('ok') else if (a>=14) and (a<18) write ('with parents');
if a<14 then write ('no');
end.
При использовании 64-символьного алфавита на 1 символ необходимо log(2)64=6 бит.
На весь учебник:
80*512*6 бит=80*512*6/8 байт = 10*512*6/1024 Кбайт = 30 Кбайт
На паскале
---
uses crt;
var a,b,max: integer;
begin
writeln('Вводите последовательность. Окончание последовательности - 0.');
readln(a);
max:=a;
while a<>0 do begin
if (a>max) then max:=a;
readln(a);
end;
writeln('Наибольшее число последовательности: ',max);
<span>end.</span>
Корень и суффикс это часть слова,
морфемы