Всимфонический оркестр приняли на работу трех музыкантов: брауна, смита и вассона умеющих играть на скрипке,флейте альте, кларнете, гобое и трубе.
известно, что
1 смит самый высокий
2. играющий на скрипке меньше ростом играющего на флейте
3. играющие на скрипке и флейте и браун любят пиццу
4. когда между альтистом и трубачом возникает ссора, смит их мерит
5. браун не умеет играть ни на трубе, ни на гобое.
на каких инструментах играет каждый из музыкантов , если каждый владеет двумя инструментами?
Система счисления - метод записи чисел с определённого набора специальных символов (цифр) и сопоставления этим записям возможных значений.
Системы счисления бывают: позиционные (пример, десятичная и двоичная СС), непозиционные (пример, арабская или римская СС), смешанные (пример, счёт минут, часов).
Основанием системы счисления - набор символов (цифр), используемых в каждом из разрядов данного числа для его изображения в данной системе счисления
ИЛИ
Основание системы счисления - количество цифр и символов, использующихся для записи и демонстрации числа.
var
s: string;
i, count: integer;
begin
writeln('Vvedite stroky: ');
readln(s);
for i := 1 to length(s) - 2 do
if copy(s, i, 3) = 'abc' then
count := count + 1;
writeln('Kol-vo: ', count);
end.
2.
var
s1, s2: string;
i, len1, len2: integer;
begin
writeln('Vvedite stroky 1: ');
readln(s1);
writeln('Vvedite stroky 2: ');
readln(s2);
len1 := length(s1);
len2 := length(s2);
if len1 > len2 then writeln('1 stroka dlinnee')
else if len1 < len2 then writeln('2 stroka dlinnee')
else writeln('dlini strok ravnie')
end.
3.
var
s1, s2, s3: string;
begin
writeln('Vvedite stroky 1: ');
readln(s1);
writeln('Vvedite stroky 2: ');
readln(s2);
s3 := s1[1] + s1[2] + s2[1] + s2[2];
writeln('Novaja stroka: ', s3);
end.