Олег составляет таблицу кодовых слов для передачи сообщений, каждому сообщению соответствует своё кодовое слово. В качестве кодовых слов Олег использует 4-буквенные слова, в
которых есть только буквы A, Б, В, Г, Д и Е, причём буква Г появляется ровно 1 раз и только на
первом или последнем месте. Каждая из других допустимых букв может встречаться в кодовом
слове любое количество раз или не встречаться совсем. Сколько различных кодовых слов может
использовать Олег?

Решение на Си:

#include <stdio.h>

int main() {

  int array[100]; // массив элементов
  int n, k, count = 0; // вс числа

  printf("Введите число для сравнения:");
  scanf("%d", &k); // запоминаем число для сравнения

  printf("\nВведите количество элементов:");
  scanf("%d", &n); // запоминаем количество элементов в массиве

  printf("\nВведите %d элементов: ", n);
  for (int i = 0; i < n; i++) {
     scanf("%d", &array[i]); // считываем массив

    if (array[i] > k) { // если число в массиве строго (!) больше нужного 
     count++; // то увеличиваем счётчик 
    }
  }

  printf("\n%d элементов больше, чем %d.", count, k); // выводим результат
 
return 0;
}

Var a,b,c: real;
Begin
write('Введите 3 числа: ');
readln (a,b,c);
if c = sqrt(a*a + b*b) then writeln('Число ',c,' является гипотенузой прямоугольного треугольника со сторонами ',a,' ',b,' ',c)
else if a = sqrt(c*c + b*b) then writeln('Число ',a,' является гипотенузой прямоугольного треугольника со сторонами ',a,' ',b,' ',c)
else if b = sqrt(a*a + c*c) then writeln('Число ',b,' является гипотенузой прямоугольного треугольника со сторонами ',a,' ',b,' ',c)
else writeln('Эти числа не являются сторонами прямоугольного треугольника')
End.