Дано зміннi z:= А , x:= B , y:= C . Який результат S:=X+X+7+у в мові програмування Free Pascal? AACB - id1777648820210607 от ghui1 07.06.2021 19:45

Question

Информатика: Дано зміннi z:= А , x:= B , y:= C . Який результат S:=X+X+7+у в мові програмування Free Pascal? AACB BBCA ВВАС​

ghui1 · Accepted Answer

//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)

1)
begin
var a:=ReadString('Введите слово->').ToLower;
Println(a=ReverseString(a)?'Перевертыш':'Не перевертыш');
end.

Пример(1):
Введите слово-> Комок
Перевертыш

Пример(2):
Введите слово-> Револьвер
Не перевертыш

2)
begin
var a:=ReadInteger('Число-> ');
Range(1,a).Where(t->a mod t=0).Println;
end.

Пример:
Число-> 100
1 2 4 5 10 20 25 50 100

3)
begin
for var i:=2 to 10000 do
begin
var a:=Range(1,i-1).Where(t->i mod t=0).Sum;
if a=i then Write(i,' ');
end;
end.

ответ:
6 28 496 8128

Дано зміннi z:='А', x:='B', y:='C'. Який результат S:=X+X+7+у в мові
програмування Free Pascal?

AACB

BBCA

ВВАС

MOGZ ответил

Дано зміннi z:='А', x:='B', y:='C'. Який результат S:=X+X+7+у в мовіпрограмування Free Pascal?AACBBBCAВВАС​

MOGZ ответил

Дано зміннi z:='А', x:='B', y:='C'. Який результат S:=X+X+7+у в мові
програмування Free Pascal?

AACB

BBCA

ВВАС