Самый современный информационный канал(8 букв)

Точно не скажу,но кажется,это  интернет

Program calc; var   operation: char;   s,a,b: real; begin   writeln('введите первое число'); readln(a);   writeln('выбирайте знак(+ - * /)'); readln(operation);   writeln('введите второе число'); readln(b);   if (b=0) and (operation = '/') then begin       writeln ('error');       exit   end;   case operation of   '+': s: =a+b;   '-': s: =a-b;   '*': s: =a*b;   '/': s: =a/b;   end;   writeln('результат: ',s) end.

#include < iostream> usingnamespacestd; intmain(){ cout < < "\t\tпрограмма палиндром в с++\n" < < endl; inta, b, c, e, q; cout < < "введите шестизначное число: "; cin > > a; cout < < "\n\n"; if (a > = 99999 & & a < = 100000){ b = a / 100000; a = a % 100000; c = a / 10000; a = a % 10000; a = a % 1000; e = a / 100; a = a % 100; q = a / 10; a = a % 10; if (b == a & & c == e){ cout < < "это число палиндром"; }elsecout < < "это число не палиндром"; }elsecout < < "вы ввели не шестизначное ! "; return 0; }