Var a,b,c:integer;
begin
read(a,b,c);
if b>a then a:=b;
if c>a then writeln(c) else writeln(a);
end.
#include <iostream>
using namespace std;
int main()
{
unsigned long long int n;
cin>>n;
for(unsigned long long int i=2; i<=n/2; ++i){
if (n%i==0) {cout<<"FALSE"; return 0;}
}
cout<<"TRUE";
return 0;
}
Как тебя зовут?))))))))))) А вроде 32 значный алфавит это 32 знака в нем, это кодируется 5 битами на символ
<span>то есть для слова в 11 символов - 55 бит или 8 ( округляем в большую сторону ) байт</span>
===== PascalABC.NET =====
begin
var n := 22;
var a := ArrRandom(n, 0, 12);
a[a.High] := 11;
a.Println;
var s := 0;
for var i := 0 to a.High do
begin
if a[i] > 10 then
$'a[{i + 1}] = {a[i]} '.Print;
if a[i] mod 4 = 0 then
s += a[i]
end;
Writeln;
Println('Сумма', s)
end.