<span>MCDXXXIV-1434 ........................................ </span><span> </span>
1) Программа выводит N раз число K:
var k,n,i: Integer;
begin
writeln('Введите k');
readln(k);
writeln('Введите n');
readln(n);
for i:=1 to n do writeln(k);
end.
2) Сумма чисел от 6 до 10:
var a,sum: Integer;
begin
for a:=6 to 10 do
begin
Inc(sum,a);
end;
writeln(sum);
end.
<span>Сведения о чем-либо, независимо от формы их представления.</span>
Из целых чисел такая пара только одна - 2 и 2.
А если программу писать, то так
var a, b: integer
BEGIN
for a=1 to 100 do
begin
for b=1 to 100 do
begin
if a+b=a*b then write (a, b);
end;
end;
END.
Если можно брать нецелые числа, то для любого х второе число равно x/(x-1)
Например, 3 и 3/2. 3 + 3/2 = 3*3/2 = 9/2
(23+35) : (94-92) =?
Первое действие в скобках. 23+35=58 первые скобки раскрыты. Раскрываем вторые: 94-92=2 Вторые скобки тоже раскрыты. Мы получаем:
58:2=? можно разделить устно. 58:2=29;
(23+35):(94-92)=29;
23+35=58
94-92=2
58:2=29