Using System;
class Program
{
static void Main()
{
var symbols = new char[] {'A', 'a', '0', '}', 'T'}; //символы из которых может состоять строка
var r = new Random();
var s = "";
for(var i = 0; i < r.Next(255); i++) {
s += symbols[r.Next(symbols.Length - 1)].ToString();
}
Console.WriteLine(s);
Console.ReadKey();
}
}
Program summa;
uses crt;
const N =10;
var B:array[1..N] of integer;
s,i : integer;
begin
s:=0;
for i:=1 to N do
begin
write( 'B[ ' ,i, ']= ' ); readln(B[i]);
s:=s+B[i];
end;
writeln( 's=' ,s);
end.
#include<iostream>
int main(){
int A;
std::cin >> A;
std::cout << A*A;
return 0;
}
................................................