Исходное данное - трёхзначное число x.
Выполни для x=145 следующий алгоритм.
a:= x div 100
b:= x mod 100
c:= x mod 10
s:= a + b + c

группы клавиш на клавиатуре делятся по своему назначению:

1)алфавитно-цифровая группа - для ввода букв и цифр

2)группа клавиш-модификаторов - для изменения действий других клавиш ( shift,ctrl,alt)

3)   функциональная группа f1-f12

4)цифровая панель (цифры справа для бухгалтеров и операторов)

это основые  группы клавиш на клавиатуре, также могут быть кнопки для , звуком, компьютером..

при использовании компьютерного алфавита 1 символ = 1 байт, значит

20000 символов = 20000 байт

20000 : 1024 = 19,5 кбайт

19,5 кбайт < 20 кбайт, значит текст на дискету поместиться.

в древней индии писали на камне и листьях пальмы. листья пальмы высушивали и нарезали длинными, узкими пластинами. надпись наносили тушью. если для записи использовалось более одного листа, то все написанные листы соединяли бечевкой, концы которой прикреплялись к хорошо обструганным деревянным дощечкам. пальмовые листы находились между двумя дощечками, как книга в переплете.

1)

var

a: array [1..5,1..10] of integer;

i,j,p: integer;

begin

for i: =1 to 5 do 

begin

for j: =1 to 10 do

begin

a[i,j]: =random(50)+1;

write(a[i,j]: 3);

end;

writeln;

end;

writeln('меняем 1 и последнюю строки');

for j: =1 to 10 do

begin

p: =a[1,j];

a[1,j]: =a[5,j];

a[5,j]: =p;

end;

for i: =1 to 5 do 

begin

for j: =1 to 10 do

write(a[i,j]: 3);

writeln;

end;

end.

2)

var a: array [1..5, 1..10] of integer; i, j: integer; p: real;

begin for i : = 1 to 5 do begin for j : = 1 to 10 do begin a[i, j] : = random(50) + 1; write(a[i, j]: 3); end; writeln; end; writeln('произведения элементов строк'); for i : = 1 to 5 do begin p : = 1; for j : = 1 to 10 do p : = p * a[i, j]; writeln(p: 25: 0); end; end.