М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
raku13
raku13
27.10.2020 20:25 •  Информатика

Сэто программой разобраться,)

👇
Ответ:
victoria6178
victoria6178
27.10.2020

Начать стоит с того, что вы, судя по всему абсолютно не знакомы с С-подобным синтаксисом. Любой блок инструкций в языке C++ "оборачивается" в фигурные скобки

Например

for (int i = 1; i < 10, i++)

{

cout << 'plaint text' << endl;

}

Или

if (УСЛОВИЕ)

{

//Инструкции

} else {

//Так же инструкции

if (???)

{

//Инструкции

} // Конец блока инструкций оператора

} // Конец блока инструкций оператора

Так же у вас есть ошибки в форматировании строк

cout <<\n "text" - \n перед строкой - синтаксическая ошибка, там ничего не должно быть. Форматирование строк в С++ делается по другому (Честно, плохо помню, ибо на С++ почти не пишу)

И это только то, что на беглый взгляд заметил человек, на С++ пишущий только домашние задания школьникам на этом сайте. Если начать вдумываться, тут можно ещё дюжину косяков найти

Советую как минимум посмотреть на ютубе пару уроков по С++ или почитать соответствующую литературу в интернете

Объяснение:

4,4(19 оценок)
Открыть все ответы
Ответ:
serovau85
serovau85
27.10.2020
// PascalABC.NET 3.0, сборка 1164 от 11.02.2016
function gcd(a,b:integer):integer;
// Нахождение НОД
var
  i: longint;
begin
  while b <> 0 do begin
    a := a mod b;
    i := b; b := a; a := i
    end;
  Result:=a
end;

begin
  var a:=ReadInteger('a=');
  var b:=ReadInteger('b=');
  var nod:=gcd(a,b);
  if nod>1 then
    WritelnFormat('Дробь сократима: {0}/{1}={2}/{3}',
    a,b,a div nod,b div nod)
  else WritelnFormat('Дробь {0}/{1} несократима',a,b)
end.

Тестовое решение:
a= 23541
b= 335160
Дробь сократима: 23541/335160=59/840
4,7(3 оценок)
Ответ:
Saidusa
Saidusa
27.10.2020
//Pascal ABC.NET v3.0 сборка 1111

Const
 n=5;

Var
 ma:array[1..n,1..n] of integer;
 i,j:integer;
begin
 writeln('Matrix reading...');
 for i:=1 to n do
  begin
   writeln;
    for j:=1 to n do
      readln(ma[i,j]);
  end;
 writeln('First matrix:');
 for i:=1 to n do
  begin
   writeln;
    for j:=1 to n do
     begin
      write(ma[i,j]:4);
      if (ma[i,j]<-8) or (ma[i,j]>6) then ma[i,j]:=sqr(ma[i,j]);
     end;
  end;
 writeln;
 writeln('Final matrix:');
 for i:=1 to n do
  begin
   writeln;
    for j:=1 to n do
     write(ma[i,j]:4);
  end;
end.

Пример ввода:
1
2
3
4
5

6
7
8
9
1

2
3
4
5
6

7
8
9
1
2

3
4
5
6
7
Пример вывода:
First matrix:
   1   2   3   4   5
   6   7   8   9   1
   2   3   4   5   6
   7   8   9   1   2
   3   4   5   6   7
Final matrix:
   1   2   3   4   5
   6  49  64  81   1
   2   3   4   5   6
  49  64  81   1   2
   3   4   5   6  49
4,7(48 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ