Var
a:array[1..100] of integer;
b, c, i: integer;
begin
read(b); read(c);
for i:=b to c do begin
a[i]:=i;
if a[i] mod 2=0 then
writeln(a[i], ' '); end;
end.
Var y,x: Integer;
begin
writeln('Введите x');
readln(x);
if (x>3) then y:=3*x-1
else y:=10;
writeln('Ответ, y = ', y);
end.
Типовые детали это элементы строительных конструкций и изделий.Они пременяются в проэктировании и строительстве.
ток-кот=кто это 954-459=495.
бра+бар=раб это 495+459=954
Вебклиент. Это ответ на твоё задание