Склавиатуры вводят код символа. составьте программу, которая выводит предыдущий символ.

Pascal: var code: byte; begin   write ('code = ');   readln (code);   writeln (chr(pred(; end. c++: #include < iostream> using namespace std; int main() {   int code;   cout < < "code: ";   cin > > code;   char ch=static_cast< char> (code);   cout < < ch < < endl;   return 0; }

#include <iostream>

#include <cmath>

using namespace std;

int main()

{

   float x1, y1, x2, y2, x3, y3, v1, v2, b1, b2;

   cout << "x1 y1: ";

   cin >> x1 >> y1;

   cout << "x2 y2: ";

   cin >> x2 >> y2;

   cout << "x3 y3: ";

   cin >> x3 >> y3;

   v1 = x1 + x2;

   v2 = y1 + y2;

   b1 = x1 + x3;

   b2 = y1 + y3;

   cout << "Sum 1: " << "(" << v1 << ";" << v2 << ")" << endl;

   cout << "Sum 2: " << "(" << b1 << ";" << b2 << ")";

}

// pascalabc.net 3.3, сборка 1605 от 31.12.2017 // внимание! если программа не работает, обновите версию! begin   var mc: =readlnstring('введите число из трех цифр: ').tochararray;   var s: ='';   foreach var a in mc do       foreach var b in mc do           foreach var c in mc do               s+=a+b+c+' ';   s.tointegers.where(t-> t> 99).distinct.orderby(t-> t).println end. примеры введите число из трех цифр: 142 111 112 114 121 122 124 141 142 144 211 212 214 221 222 224 241 242 244 411 412 414 421 422 424 441 442 444 введите число из трех цифр: 208 200 202 208 220 222 228 280 282 288 800 802 808 820 822 828 880 882 888 введите число из трех цифр: 555 555