Укажите, сколько раз выполнится тело цикла с заданным заголовком: for i: = 2 to 6 do

ха-ха-ха)) учебник по информатике за 10

там все

программа №4

program str999; uses crt; var s: string; begin writeln('введіте фразу'); read(s); if (s='край озер') then writeln ('край озер лесов и рек'); if (s='я учусь в школе') then writeln ('я учусь в 10-м классе') end.

потхоньку буду дополнять, не так все быстро)) 

№5

program р_1; uses crt; var s: string; begin writeln('введите фразу'); read(s); if (s='моя родина беларусь') then writeln ('беларусь моя родина'); if (s='люблю цябе мой родны кут') then writeln ('мой родны кут люблю цябе') end. 

грубо и сердито:

var c: longint;

begin

  read(c);

  c: =c mod 10;

  c: =sqr(c);

  writeln(c);

end.

a*b*i=i

n=2^i

где a*b-размер изображения, n-количество цветов,i-количество памяти на один пиксел, i-вес рисунка(бит)

1)64*64*i=512*8

i=1

n=2

ответ: 2

2)256=2^i

i=8

a*b*8=2400*8

a*b=2400

ответ: 2400

3)n1=4=2^2

i1=64*128*2=2^14бит=2кбайт

n2=16=2^4

i1=32*32*4=2^12бит=0,5кбайт

ответ: на первое изображение потребуется в 4 раза больше места

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