1)Ввод с клавиатуры чисел a, b, l
2)расчёт по формуле:
Длинна шнурка = (7*a)+(2*l)+(6*b)
Уже писала, но напишу еще раз. Указывайте на каком языке программирования нужно писать программу.
program ff;
var
y,x:real;
begin
writeln('Введите x');
readln(x);
if x>=2 then
y:=sin(x)/sqr(x)
end;
if x<2 then
begin
y:=(x+8)/(x-2);
end;
writeln('y=',y);
readln();
end.
program Digits;
procedure foo(a: integer);
begin
if a = 0 then exit
else
foo(a div 10);
Print(a mod 10)
end;
var
a: integer;
begin
a := 12345;
foo(a)
end.
Var s:int64;
a,b,i:longint;
beginassign(input,'d.in');
reset(input);
assign(output,'d.out');
rewrite(output);
s:=0;
read(a,b);
if odd(a) then i:=a else i:=a+1;
while i<=b dobegins:=s+i;
inc(i,2);
end;
writeln(s);
<span>end.</span>
Машины первого поколения строились на основе электронных (электровакуумных) ламп.