Pascal
var
m : integer;
a,b,y : real;
begin
writeln ('menu:');
writeln ('1) y= (a+b)2');
writeln ('2) y= a^2-b^2');
writeln ('3) y= 1/(a+b)')
writeln ('a=');
readln(a);
writeln ('b=');
readln(b);
readln (m);
case m of
1: y := (a+b)*2;
2: y :=sqr(a)-sqr(b);
3: y := 1/(a+b);
end;
writeln ('y=',y:3:2);
end.
Ну... На С++ это будет так:
1) #include <cmath>
...
double m, g, a, result;
...
result = m*g*cos(a);
2) double a, b, c, result;
...
result = (a*b + b*c)/(a*b);
3) #include <cmath>
...
double x, result;
...
result = abs(1 - abs(x));
Правильный ответ 15, то есть под номером 2
Шестиклассники Аня, Боря, Вася, Галя, Даша и Иван получили флешки на 1,2,4,8,16,32 Гб. Выясните, кто из ребчт получили флешку са
alexandro76 [1]
У Ивана самая большая(32Гб), а у Гали самая маленькая(1Гб).