"Да" надо заключить в 'Да'
А вообще, лучше использовать цифры. Например, 1 и 2, Да и Нет соответственно. А в выводе указать, "Введите 1 для подтверждения"
<em>// PascalABC.NET 3.2, сборка 1488 от 21.06.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(31,16,27); a.Println;
var s:=a.Select((x,i)->(x,i)).OrderBy(x->x[0]).Select(x->x[1]+1);
Write('Семь самых холодных дней: '); s.Take(7).Println;
Write('Семь самых жарких дней: '); s.TakeLast(7).Println
end.
<u>Пример</u>
17 17 25 27 22 26 22 23 26 26 25 16 21 25 22 17 20 19 16 19 21 22 19 16 21 27 22 24 22 24 22
Семь самых холодных дней: 12 19 24 1 2 16 18
Семь самых жарких дней: 11 14 6 9 10 4 26
Размер символов, последовательность символов, параметры страницы, <span>параметры абзаца. (может быть и верно)</span>
Var
k:real;
i,:integer;
begin
k:=0;
for i:=1 to 20 do
k:=k+1/i;
write(k);
end.
Пусть x - количество двухкомнатных квартир, тогда вероятность того, что кто-то живет в двухкомнатной квартире = x/32.
По формуле Шеннона I = log(2)1/p = log(2)[1/x/32] = log(2)[32/x] = 2
32/x = 2^2; x = 32/4 = 8
Ответ: в доме 8 двухкомнатных квартир.