Решение в лоб :D, только желательно запускай прогу отдельно в папке.
Program out;
var fo:text;
begin
assign(fo,'output.txt');
rewrite(fo);
Writeln(fo,'Program AplusB;');
Writeln(fo,'var A,B: Integer;');
Writeln(fo,'begin');
Writeln(fo,' Assign(input,''input.txt'');');
Writeln(fo,' Reset(input);');
Writeln(fo,' Assign(output,''output.txt'');');
Writeln(fo,' Read(A,B);');
Writeln(fo,' ReWrite(output);');
Writeln(fo,' WriteLn(A+B);');
Writeln(fo,' Close(input);');
Writeln(fo,' Close(output);');
Writeln(fo,'end.');
close(fo);
end.
#include <iostream>
#include <iomanip>
using namespace std;
int main() {
double xn, xk, dx;
cout << "xn = ";
cin >> xn;
cout << "xk = ";
cin >> xk;
cout << "dx = ";
cin >> dx;
int k = 0;
for (int x = xn; x < xk; x += dx ){
if (x < 3){
cout << setw(5) << x*x*x << " ";
k++;
if (k == 4){
cout << endl;
k = 0;
}
}else if (x >= 3){
cout << setw(5) <<x * x << " ";
k++;
if (k == 4){
cout << endl;
k = 0;
}
}
}
return 0;
}
Int a[10][10];
a[0][2] = 1;
a[0][4] = 2;
a[0][6] = 3;
a[0][8] = 4;
a[2][2] = 5;
a[2][4] = 6;
a[2][6] = 7;
Ответ 3, очевидно же, по отчеству (имя отца)
Ложное высказывание: это цифра (5)