Примеры сетевых информационных систем для разных направлений профессиональной деятельности

40-1=40 ніг буде без капітана

15-1=14 голів буде без капітана

40/2=20

20-14=6 котів було на кораблі

program p;

vara,b,c,i,j,n : integer;

beginwriteln('введите три числа'); readln(a,b,c);

if a> b then if a> c then writeln(a,c,b) else writeln(c,a,b) else if c> b then writeln(a,b,c) else writeln(b,c,a);  

readln; end. 

2000 - k

16 бита - i

v=k*i=2000*16=32000 бита=4000 байтов

6, понедельник, иа, 1, на печи,клюв, царь, марка, гласных 10, согласных 21, всего 33