1.1.1. Для передачи данных используется 8-битовый код, в котором младшие 7 бит – это ASCII-код символа, а старший бит – контрольный бит чётности. Определите коды символов, которые были переданы без ошибок, а ошибочные замените нулями. Используя таблицу ASCII (A – 65, B – 66, …, Z - 90), определите правильно принятые символы. Попытайтесь восстановить известное английское слово, связанное с информатикой, которое пытались передать. 11010111 11001001 11001110 01000100 01001111 11010111 01010011

Pascal:
var a,b,c:real;
begin
  write ('Number 1: ');
  readln (a);
  write ('Number 2: ');
  readln (b);
  write ('Number 3: ');
  readln (c);
  writeln ('Srednee: ',(a+b+c)/3:0:4);
  readln;
end.

C++:
#include <iostream>
#include <iomanip>
using namespace std;
int main()
{
   float a,b,c;
   cout.setf(std::ios_base::fixed,std::ios_base::floatfield);
   cout <<"Number 1: ";
   cin >>a;    
   cout <<"Number 2: ";
   cin >>b;
   cout <<"Number 3: ";
   cin >>c; cout.precision(4);
   cout <<"Srednee: " <<(a+b+c)/3 <<endl;
   return 0;
}

Pascal:
var a,b,c:real;
begin
  write ('Number 1: ');
  readln (a);
  write ('Number 2: ');
  readln (b);
  write ('Number 3: ');
  readln (c);
  writeln ('Srednee: ',(a+b+c)/3:0:4);
  readln;
end.

C++:
#include <iostream>
#include <iomanip>
using namespace std;
int main()
{
   float a,b,c;
   cout.setf(std::ios_base::fixed,std::ios_base::floatfield);
   cout <<"Number 1: ";
   cin >>a;    
   cout <<"Number 2: ";
   cin >>b;
   cout <<"Number 3: ";
   cin >>c; cout.precision(4);
   cout <<"Srednee: " <<(a+b+c)/3 <<endl;
   return 0;
}