Дана последовательность целых чисел а1, а2, ... ,аn. Указать пары чисел ai, аj, таких что ai + aj = m, где m - заданное целое число. (программа Паскаль)

Ответы

Ответ дал: 8951992masha

var
mas:array [1..100] of longint;
m,n,i,j:longint;
begin
write('Количество элементов ');readln(n);
writeln('Заполняем массив');
for i:=1 to n do{прочитали все числа и занесли их в массив}
  readln(mas[i]);
writeln;
write('m=');readln(m);
i:=1;
j:=2;
while(i<=n) do{будем искать нужные упорядоченные пары(i<j,i не равно j)}
begin
  j:=i+1;
  while(j<=n) do
  begin
   if((mas[i]+mas[j])=m) then{нашли и вывели на экран}
    writeln(mas[i],' ',mas[j]);
   j:=j+1;
  end;
  i:=i+1;
end;
end.

Спасибо

Ответ дал: Гость

пошаговое объяснение:

для того чтобы десятичную дробь разделить на натуральное число можно представить десятичную дробь в виде обыкновенной, затем числитель разделить на это число, а знаменатель оставить прежним(0.4: 2=(4/2)/10)

или

можно представить натуральное число и десятичную дробь в виде обыкновенных дробей и десятичную дробь умножить на дробь (которая была изначально натуральным числом) обратную делителю (поменять числитель и знаменатель местами)(0,4/2=(4/10)/(2/1)=(4*1)/(10*2))

или

нужно перенести запятую в десятичной дроби вправо настолько знаком чтобы дробь стала натуральным числом а затем число на которое мы делаем приписать сколько ноликов на сколько знаков мы перенесли запятую. затем просто разделить бывшую десятичную дробь на натуральное число(0,4/2=4/20=1/5=0,2)

Ответ дал: Гость

ответ:

2/7

пошаговое объяснение:

(5 5/18-4 7/12)× 1 2/25 : (1 1/4+1 3/8)=2/7

1) 5 5/18-4 7/12=4 23/18-4 7/12=4 46/36-4 21/36=25/36

2)25/36*1 2/25=25/36*27/25=3/4

3)1 1/4+1 3/8=1 2/8+1 3/8=2 5/8

4)3/4: 2 5/8=3/4: 21/8=3/4*8/21=2/7