X:=4;
y:=16;
t:=4;
x:=0; (остаток от деления 16 на 4)
y:=5; (4+1)
как то так
P.S. в скобках мои пояснения их писать не надо
2.Сортировка в линейных структурах: вставка(простая, бинарная), выбор, обмен(стандартный, Шелла, Хоара)
Сортировка в нелинейных структурах: турнирная, пирамидальная.
GIF, JPEG, PNG, и WebP-форматы у изображения
Z = 1; i = 0
z = (z+x/2)/2 = (1+14/2)/2 = 4; i = i+1 = 0+1 = 1; i<4 ⇒ 1<4 ⇒ да
z = (z+x/2)/2 = (4+14/2)/2 = 5.5; i = i+1 = 1+1 = 2; i<4 ⇒ 2<4 ⇒ да
z = (z+x/2)/2 = (5.5+14/2)/2 = 6.25 (≈6.3); i = i+1 = 2+1 = 3; i<4 ⇒ 3<4 ⇒ да
z = (z+x/2)/2 = (6.25+14/2)/2 = 6.625 (≈6.7); i = i+1 = 3+1 = 4; i<4 ⇒ 4<4 ⇒ нет
Ответ: z = 6.625 (если округлять - 6.7)
Var
str:string;
i:integer;
begin
readln(str);
for i:=1 to Length(str) do
if ( str[i] = 'П' ) OR ( str[i] = 'В' ) then
break;
writeln(str[i]);
end.