Низамов
?>

Выбери верный ответ. Программа, выводящая 23 раз слово "Russia". var i : integer; begin for i := 1 downto 23 writeln ('Russia '); readln; end. var i : integer; begin i := 1 to 23 do writeln ('Russia '); readln; end. var i : integer; begin for i := 1 to 23 do writeln ('Russia '); readln; end. var i : integer; begin for i := 1 to 23 do readln; end.

Информатика

Ответы

kolgatin69

3 ,

Объяснение:

в других примерах есть ошибки

ribcage52
Прямые параллельны между собой, если частное коэффициентов у X и Y равны.
Коэффициент - это числовой множитель в алгебраическом выражении.*
Посчитаем их.

7x + 6y + 9 = 0
У этого уравнения коэффициент у X - 7, а у Y - 6
их частное - это \frac{7}{6}

5x + 7y + 14 = 0
Тут коэффициенты X, Y это 5 и 7
их частное - \frac{5}{7}

8x + 6y + 19 = 0
Тут коэффициенты X, Y это 8 и 6
их частное - \frac{8}{6}
сократим дробь на 2, получим \frac{4}{3}

15x + 21y + 22 = 0
Тут коэффициенты X, Y это 15 и 21
их частное - \frac{15}{21}
сократим дробь на 3, получим \frac{5}{7}

10x + 14y + 4 = 0
Тут коэффициенты X, Y это 10 и 14
их частное - \frac{10}{14}
сократим дробь на 2, получим \frac{5}{7}

И того у нас получилось 3 равные дроби, это и есть те уравнения.
5x + 7y + 14 = 0
15x + 21y + 22 = 0
10x + 14y + 4 = 0
Абумислимовна_кооператив585
Var i,j: integer;
chislo: string;
begin
chislo:='12323';
 for j:=1 to 14 do
  begin
  i:=1;
  while i<=length(chislo) do
   begin
   if copy(chislo,i,1)='1' then begin delete(chislo,i,1);insert('33',chislo,i); inc(i); end;
   inc(i);
   end;
  i:=1;
  while i<=length(chislo) do
   begin
   if copy(chislo,i,1)='2' then begin delete(chislo,i,1);insert('1',chislo,i);  end;
   inc(i);
   end;
  i:=1;
  while i<=length(chislo) do
   begin
   if copy(chislo,i,1)='3' then begin delete(chislo,i,1);insert('2',chislo,i); end;
   inc(i);
   end;
 end;
Writeln(chislo);
readln;
end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Выбери верный ответ. Программа, выводящая 23 раз слово "Russia". var i : integer; begin for i := 1 downto 23 writeln ('Russia '); readln; end. var i : integer; begin i := 1 to 23 do writeln ('Russia '); readln; end. var i : integer; begin for i := 1 to 23 do writeln ('Russia '); readln; end. var i : integer; begin for i := 1 to 23 do readln; end.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

shelep19789
knigi21212
Andreevna_Grebenshchikova155
gaina6678
textildlavas21
korotaeva778898
pimenovamar
dimkimka386
osechkinandrejj
ОвсепянСергей88
ur101679
Yevgenevich_Chipura-Nikolaeva
optikaleks7
praktikadok
klimenko05