Каждая цифра представлялась с трёх символов, имевших - вопрос №21134901 от математик222 29.06.2020 16:11

Question

Информатика: Каждая цифра представлялась с трёх символов, имевших значения: «ракушка» * — ноль, «точка» . — один, «черта» | — пять. Комбинация этих символов являлась корректной записью цифры, если: сумма их значений равна значению записываемой цифры, количество использованных символов минимально, символы «точка» предшествуют символам «черта». Например, цифра три записывалась как ... , а цифра двенадцать — как ..|| . Требуется по двум заданным в записи майя числам определить их сумму и представить в той же записи.

математик222 · Answer

Вариант 1var  str:string;  A,B,i:integer; begin   write( введите ваш текст );   readln(str);   for i:=1 to length(str) do begin     if (str[i]= А )or (str[i]= а ) then a:=a+1;     if (str[i]= Б )or (str[i]= б ) then B:=b+1;   end;   if (A+B)=0 then write( нет таких букв ) else write ( A= ,A, Б= ,b);end.вариант 3var  str:string;  A,B,i:integer; begin   write( введите ваш текст );   readln(str);   i:=1;   while i =length(str) do begin    if (str[i]= А )or (str[i]= а ) then delete(str,i,1);    i:=i+1; ...