Предмет: Информатика,
автор: sepeevsasha
Составить программу, которая выводит меню и при нажатии вводе цифры вычисляет соответствующее
выражение:
1 ) y= (a+b)2
2 ) y= a^2-b^2
3 ) y= 1/(a+b)
Ответы
Автор ответа:
0
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.
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.
Похожие вопросы
Предмет: Физика,
автор: mikalishenko
Предмет: Геометрия,
автор: f1ngo
Предмет: Химия,
автор: DizikOP
Предмет: Математика,
автор: ravimakhmuto