uses crt;
var a:array[1..99,1..99] of integer;
m,n,s,i,j:integer;
begin
write('Введите m и n: ');
readln(m,n);
writeln('Исходная матрица: ');
for i:=1 to m do begin
for j:=1 to n do begin
a[i,j]:=random(10-(-10)+1)-10;
write(a[i,j]:3);
end;
writeln;
end;
s:=0;
for i:=1 to m do begin
for j:=1 to n do begin
if a[i,j]<0 then s:=s+1;
end;
if s=2 then begin writeln('Строка с двумя отрицательными элементами есть'); halt; end; {если нужная строка найдена, программа выдаёт надпись о её нахождении и немедленно завершается}
s:=0;
end;
writeln('Строки с двумя отрицательными элементами нет');
end.
#include <iostream>
using namespace std;
struct my{
int x;
int y;
}
void S_size() ;
int main()
{
my my_struct = new my[5];
for(int i =0 ;i<5;i++)
{
cin >> my_struct[i].x;
cin >> my_struct[i].y;
}
S_size();
}
S_size()
{
double S = 0.5*((my_struct[0].x*my_struct[1].y)-(my_struct[1].x *my_struct[0].y))*((my_struct[1].x * my_struct[2].y)-(my_struct[2].x*my_struct[1].y))*((my_struct[2].x * my_struct[3].y)-(my_struct[3].x*my_struct[2].y))*((my_struct[3].x * my_struct[4].y)- (my_struct[4].x*my_struct[3].y));
cout << S ;
}