Всмысле? Это вопрос вообще?
Выбирите истиное высказывание! (Так)
В коробке лежали 5 серых насков, 5 красных, 8 чёрных.
А) Еслидостать 4 носка среди них будет обязательно 3 чёрных.
В) Если достать 15 носков то среди них обязательно будет красные носки.
С) Если достать 2 носка среди них будет чёрные.
Правильно будет В)
Сама состовляла!!!
Число в 2 сс - 1000001
1000001(2)=2^6+2^0=65(10)
Ответ: 65
program raf105;
var n,a,b,s,sum,i:integer;
begin
write('Введите количество комнат: ');
readln(n);
for i:=1 to n do
begin
writeln;
writeln('Комната №',i);
write('Длина: ');
readln(a);
write('Ширина: ');
readln(b);
s:= a*b;
writeln('Площадь: ',s,' м²');
sum:= sum+s;
end;
writeln;
writeln('Общая сумма площадей всех комнат: ',sum,' м²');
end.
<u><em>Язык программирования PascalABC</em></u>
Program antonim;
var s1,s2:string;
begin
s1:='горячий';{Наше слово}
write ('Введите антоним (с маленькой буквы) к слову ',s1,': ');
readln (s2);{Ввод антонима}
if (s2<>'холодный') or (s2<>'прохладный') then writeln ('Таких слов нету.'); {Проверка условия}
end.