Var x,y,k:integer;
begin
Writeln('Привет,я-alconafft');
writeln('введите числа х у');
read(x,y);
k:=x mod y;
write(k);
end.
Заполним таблицу по исходным значениям:
А B C D
4 X 6 11
12 B1-2 12 12
По рисунку видно, что все секторы равны, следовательно и в B2 должно быть 12, а это получиться только в том случае, если B1 = 14.
Ответ: 14
Это лепестковая диаграмма, без вариантов.
но букв 11.
Спортивный инвентарь, советские тренажеры - выбери, как больше нравится
begin
writeln('Сдача с 1000р при покупке 3 кг и 500г по цене 80 за кг = ', (1000 - (3.5 * 80)):2:2);
end.