D16+1001001=<span> D16+49=D5F</span>
Program First;
var
x, y : longint;
begin
readln(x);
y:=(x-7)*(x+5);
writeln(y);
end.
Var
i: integer;
begin
readln(i);
if i mod 2 = 0 then
writeln(i);
else
writeln(i-1);
end
Линейный алгоритм или следование – это тип алгоритма, в котором последовательность действий не меняется в его процессе выполнения.
Т.е 2
Program chisla;
uses crt;
var a:integer;
begin
Write('Введите число - ');
readln(a);
If a>0 then
write('+1')
else begin
If a<0 then
write('-1')
else begin
If a=0 then
write('0')
else begin
end;
end;
end;
<span>end.</span>