Первое нужно выполнить СЛОЖЕНИЕ, второе ВЫЧИТАНИЕ, третье УМНОЖЕНИЕ, четвёртое ДЕЛЕНИЕ)
1) количество возможных комбинаций это кол во символов в алфавите в степени числа букв в слове - при 2-х символах количество возможных слов равно 2^3=8 < 12 это нам не подходит при 3-х символах количество возможных слов равно 3^3=27 > 12
<span>2)тут все чуть сложнее, нехватку условий дополню сам. смысл такой - рас утверждение говорит нам о клетке А и несет 4 бита значит именно 16 тигров находится в этом вальере(2 в 4степени) следовательно самый простой способ определения, при том условии что именно на этих условия шло сообщение о тигре альбиносе, это бональное вычитание 64-16=48. но повторюсь еще раз, как по мне так условий явно нехватает
токо 12
</span>
Program z1;
var s,a,b:real;
begin
writeln('введите стороны прямоугольника');
readln(a,b);
s:=a*b;
writeln(s);
end.
75 дели на 2 столбиком. пока делитель не станет больше делимого
Названия и адреса файлов подгоните сами. Я выделю в коде жирным шрифтом.
uses crt;
var i,o:text;
s:string;
ans:integer;
begin
assign(i,'C:\Pascal\input.txt'); reset(i);
assign(o,'C:\Pascal\output.txt'); rewrite(o);
while eoln(i)<>true do
begin
readln(i,s);
if ((s[2]>s[1]) and (s[3]>s[2]) and (s[4]>s[3])) or ((s[2]<s[1]) and (s[3]<s[2]) and (s[4]<s[3])) then
begin
writeln(o,s);
inc(ans);
end;
end;
writeln(ans);
close(o);
<span>end.</span>