Для выделения в четырехзначном числе X цифры из разряда единиц следует воспользоваться командой... а)n:=X-1;
б)n:=X mod 10;
в)нет верного ответа
г)n:=X div 1000;
д)все ответы верны

Результатом выполнения оператора 13 div 3 будет ...

8
4
0
3

var s,s1: string; n,i: integer; begin readln(s); readln(n); for i: =1 to n do begin insert(s[1],s1,length(s1)+1); delete(s,1,1); end; s: =s+s1; writeln(s); end.

var

a: [1..100] array of integer;

i,n,p: integer;

begin

readln(n);

for i: =1 to n do

begin

readln(a[i]);

p: =2;

while (p*p< =a[i]) do

begin

if p*p=a[i] then writeln (a[i],' полный квадрат')

p: =p+1;

end;

end;

end.

фомат gif

в начале идет табличка соответствия цветов под номерами

потом каждый пиксель помечается номером цвета.

ответ: 0,0261 килобайта

1байт=8бит, 1кб=1024байт

214/8=26.75

26.75/1024=0.0261

1кбайт=1 тысяча байтов.значит 214бит надо превратить в байты - 1байт это 8бит; 214: 8=26,75.

26,75 x 1000=26750

вообще-то, кб> байт и надо делить, а не умножать.