Var i,y,a,b: single;
begin
writeln('Выберите действие: 1)y=(a+b)^2; 2)y=a^2-b^2; 3)y=1/(a+b)');
read(i);
if i=1 then begin
writeln('Введите a и b');
read(a,b);
write('y=',(a+b)*(a+b));
end
else begin
if i=2 then begin
writeln('Введите a и b');
read(a,b);
write('y=',(a*a)-(b*b));
end
else begin
if i=3 then begin
writeln('Введите a и b');
read(a,b);
write('y=',1/(a+b));
end;
end;
end;
<span>end.</span>
Ответ:
С++ :
#include < iostream >
using namespace std ;
int main (){
int a , b , mn ;
cin >> a >> b ;
int F[a][b];
int A[a][b]={1};
for (int i= 0 ; i < a; a++)
{
for (int j = 0 ; j<b ; j ++ ){
cin >> F[i][j];
}
}
for (int i= 0 ; i < a; a++)
{
for (int j = 0 ; j<b ; j ++ ){
if (F[i][j]%2==1){
if (F[i][j]%3==2){
A[i][j]=F[i][j];
}
}
}
}
for (int i= 0 ; i < a; a++)
{
for (int j = 0 ; j<b ; j ++ ){
mn = A[i][j]*A[i][j-1];
}
}
cout << mn;
return 0 ;
}
Объяснение:
var x:integer;
begin
writeln('Введите значение x: ');
readln(x);
if x<3 then
writeln('y = ',sqr(x))
else
if x>3 then
writeln('y = ',sqrt(x))
else
if x=3 then
writeln('y = ',2*x);
end.