Question

Пожайлуста, составьте программку x={a-b}

Answer 1

Программа на языке Pascal + файл.

USES 
 Crt;
VAR x,a,b:integer;
BEGIN 
 ClrScr; 
 Write ('Введите a: '); 
 ReadLn (a); 
 Write ('Введите b: '); 
 ReadLn (b); x:=a-b; 
 WriteLn  ('x=', x); 
 GOTOXY (20, 24); 
 Write ('Для завершения работы программы нажмите [Esc]...'); 
 ReadKey;
END.

Программа на языке С++ (+ файл).

#include <iostream>
using namespace std;
int main()
{
 setlocale(LC_ALL, "Russian");
 int a, b, x;
 cout << "Введите а: ";
 cin >> a;
 cout << "Введите b: ";
 cin >> b; x = a - b;
 cout << "x = " << x << endl ;
 system("pause");
 return 0;
}