Var
a: array [1..12] of integer;
i: integer;
begin
writeln('Начальный вид массива:');
for i := 1 to 12 do
begin
a[i] := -20 + random(41);
writeln('A[', i:2, ']=', a[i]:3);
end;
writeln('Конечный вид массива:');
for i := 1 to 12 do
begin
if a[i] < 0 then a[i] := -1;
writeln('A[', i:2, ']=', a[i]:3);
end;
readln
<span>end.</span>
<em><u>Pascal:</u></em>
var code:byte;
begin
write ('Code = ');
readln (code);
writeln (chr(pred(code)));
end.
<em><u>C++:</u></em>
#include <iostream>
using namespace std;
int main()
{
int code;
cout <<"Code: ";
cin >>code;
char ch=static_cast<char>(code);
cout <<ch <<endl;
return 0;
<span>}</span>
3*2=6
128*512*6=393216Ъ
128+512=640
640:10=64
64*6=384кб
К примеру, можно просто заменить некоторые буквы(но это не совсем правильно...).
#include <iostream>
using std::cout;
using std::endl;
int main()
{
char s[] = "Mother plays with the child";
cout << s << endl;
s[0] = 'F';
s[1] = 'a';
cout << s << endl;
return 0;
}