Nazaruk_Kodochigov
?>

Определите, что выведет на экран программа при вызове F(7 procedure F(n: integer); forward; procedure G(n: integer); forward; procedure F(n: integer); begin n := n - 1; if n > 2 then begin write(n); F(n - 1); G(n - 2); end else write(n+2); end; procedure G(n: integer); begin write(n); if n > 2 then begin n := n - 1; G(n - 1); F(n - 2); end end; Распишите по действиям

Информатика

Ответы

nord248

#include <iostream>

#include <math.h>

using namespace std;

int main()

{

setlocale(LC_ALL, "Russian");

int n;

cin >> n;

char* string1 = new char[n];

char* string2 = new char[n];

cin >> string1;

cin >> string2;

bool check = true;

if (strlen(string1) != strlen(string2))  

 cout << "Неверное количество символов";

else

{

 for (size_t i = 0; i < round(strlen(string1) / 2); i++) {

  if (string1[i] != string2[i]) {

   check = false;

  }

 }

 if (check)

  cout << "Первые половины равны";

 else

  cout << "Половины первые не равны";

}

}

zadvornovakrmst
Подумайте чуть, ведь все просто. Есть массив, у него гдето есть середина, или точка симметрии. Она находится как (n div 2). Если массив четной длины, то он делится на 2 равные части, если нечетный - в середине остается один элемент, который ни с кем менять не надо.
Сейчас смотрим элементы первой половины
for i:=1 to n div 2
запоминаем их x:=a[i];
присваиваем им значения симметричных им элементов с конца
a[i]:=a[n-i+1]; например при n=10 a[1]:=a[10-1+1];
А элементам в конце присваиваем значения запомненных первых элементов
a[n-i+1]:=x;
Все, поменяли.

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

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

Определите, что выведет на экран программа при вызове F(7 procedure F(n: integer); forward; procedure G(n: integer); forward; procedure F(n: integer); begin n := n - 1; if n > 2 then begin write(n); F(n - 1); G(n - 2); end else write(n+2); end; procedure G(n: integer); begin write(n); if n > 2 then begin n := n - 1; G(n - 1); F(n - 2); end end; Распишите по действиям
Ваше имя (никнейм)*
Email*
Комментарий*

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

Беспалова
horina12
Konchenko1980
7(A^B) and (C^A) = ?A=1 B=0 C=0​
buyamel
ribcage52
Olesya
Georgievich-Zamudinovna2003
books
meteor90
s45983765471717
re-art
elenakarpova709
juliajd
AleksandrovnaIgor
Yurevna991