6) вводится последовательность чисел. конец ввода – число > 100. определить количество четных чисел, а каждое нечетное возвести в квадрат. 7) вводится последовательность чисел. конец ввода – отрицательное число. определить сумму цифр младших разрядов всех чисел, за исключением отрицательного. 8) дано число. вывести по отдельности все его цифры, определить их сумму, сумму только нечетных цифр, сумму старшего и младшего разрядов.

// PascalABC.NET 3.3, сборка 1549 от 17.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ReadSeqIntegerWhile(x->x<=100).ToArray;
  Writeln('Количество четных чисел равно ',a.Where(x->x.IsEven).Count);
  a.Transform(x->x.IsOdd?x*x:x); a.Println
end.

Пример
35 24 38 83 110
Количество четных чисел равно 2
1225 24 38 6889

begin
  Writeln('S=',ReadSeqIntegerWhile(x->x>=0).Select(x->x mod 10).Sum)
end.

Пример
16 24 19 21 45 0 23 -21
S=28

begin
  var n:=ReadInteger('n=');
  var St:=new Stack <integer>;
  while n>0 do begin
    St.Push(n mod 10);
    n:=n div 10
    end;
  var a:=St.ToArray;
  a.Println(',');
  Writeln('Сумма цифр: ',a.Sum);
  Writeln('Сумма нечетных цифр: ',a.Where(x->x.IsOdd).Sum);
  Writeln('Сумма старшего и младшего разрядов: ',a.First+a.Last);
end.

Пример
n= 53214212
5,3,2,1,4,2,1,2
Сумма цифр: 20
Сумма нечетных цифр: 10
Сумма старшего и младшего разрядов: 7

С++

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

33

34

35

36

37

38

39

40

41

42

43

44

45

46

47

48

49

50

51

52

53

54

55

56

57

58

59

60

61

62

63

64

65

66

67

68

69

70

71

72

73

74

75

76

77

78

#include "lib.h"

int showMenu(){

   int choise;

   do{

 

       cout << "1) Authorization." << endl;

       cout << "2) Registration." << endl;

       cout << "3) Exit." << endl;

       cout << "Make your choise: ";

 

       cin >> choise;

       if(cin.fail()){

           cin.clear();

           cin.ignore();

           system("cls");

           cout << "Input is incorrect.\n";

       }

 

   }while(choise <1 || choise >3);

 

   return choise;

 

}

 

void registerUser(){

   system("cls");

   cout << " Registration \n";

   cout << "Type your login (30 symbols max): ";

   char login[31] = {0};

   cin >> login;

 

   cout << "Type password: ";

   char password[32] = {0};

   cin >> password;

 

   cout << "Confirmation: ";

   char password2[32] = {0};

   cin >> password2;

 

   FILE *f = NULL;

   fopen_s(&f, "base.txt", "at");

   if(f){

       fprintf_s(f,"%s;%s\n",login,  password);

       fclose(f);

   } else {

       cout << "Registration is fail. File is not created.\n";

   }

 

}

 

bool checkUser(char* aLogin, char* aPassword){

   FILE *f = NULL;

   fopen_s(&f, "base.txt", "rt");

   if(f){

       while(!feof(f)){

           char buff[100] = {0};

           fgets(buff,99,f);

 

           if(strlen(buff)){

               buff[strlen(buff) - 1] = '\0';

               char *login = buff;

               char *password = strstr(buff,";") + 1;

               *(password - 1) = '\0';

               /*cout << "Login:" << login << endl;

               cout << "Password:" << password << endl;*/

               if(_stricmp(aLogin,login) == 0 &&

                   _stricmp(aPassword,password) == 0  

                   )

                   return true;

           }

       }

       fclose(f);

   } else {

       cout << "Users file does not exists.\n";

   }

 

   return false;

}

ошибку #ССЫЛКА!

Объяснение:

При копировании формулы она изменяется. Например, если номер столбца уменьшился на 1 (как в данном случае), то и в формуле в адресах номера столбцов уменьшатся на 1; если номер строки увеличится на 3, то и номера строк для всех ячеек, упомянутых в формуле, увеличатся на 3. Если это не требуется, перед буквой-номером столбца или номером строки в формуле можно поставить $, и тогда соответствующий номер не поменяется.

В данном случае $B$2 при копировании не изменится (абсолютная ссылка), а А1 должна превратиться в (?)4, где знаком вопроса обозначен столбец, стоящий до A (относительная ссылка). Но такого столбца в таблице нет, так что получится ошибка.