Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program xxx;
var a: string;
begin
write('введите строку-');
read(a);
write(a);
readln
end.
1. делим a и b на 33.
2. округляем вверх (до следующего целого)
3. перемножаем округлённые числа.
4. делим на n.
5. округляем вверх.
формулой: x = [([a/33]+1)*( [b/33]+1) / n] + 1
где [y] - целая часть числа y.
по формуле включений-исключений
35 = 24 + 18 + 12 - 5 - 10 - 8 + х
х = 4
чтобы понять формулу, надо нарисовать 3 круга которые имеют общую область пересечения
var s,x,n,i: integer;
read(x,n);
s: =1;
for i: = 1 to n do
s: =s*x;
writeln(s);
Популярные вопросы