Завдання 2. Побудуйте моделі «сутність-зв'язок» для описаних далі предметних областей. Визначте: сутності; атрибути сутностей; ключі; зв'язки між сутностями; типи зв'язків. у Предметна область «Водні ресурси». Кожна ріка характеризується назвою, довжиною і площею басейну, а море — площею водної поверхні. Потрібно зберігати відомості про те, територією яких держав протікає ріка, а також у яку водойму (море чи іншу ріку) вона впадає. Штучні моря (водосховища) також характеризуються площею водної поверхні і в них також можуть впадати ріки, однак кожне водосховище, на відміну від природного моря, розташоване на певній ріці.
Точная задача по Техническому Заданию: var x,y:integer; begin writeln('введите два числа'); readln(x); readln(y); if (x<1000000001) and (y<1000000001) and (x>0) and (y>0) then writeln('сумма чисел =',x+y) else writeln('диапазон чисел неверный'); end.
Если вдруг вам поверит учитель, можете перевыполнить поставленную задачу: var x,y:integer; s:string; begin randomize; writeln('взять ли числа случайными? ответ да или нет'); readln(s); if (s='да') or (s='Да') or (s='ДА') or (s='дА') then begin x:=random(1000000000); y:=random(1000000000); writeln('сумма чисел =',x+y); writeln('произведение чисел =',x*y); end else begin writeln('введите два числа'); readln(x); readln(y); writeln('сумма чисел =',x+y); writeln('произведение чисел =',x*y); end; end.
var x,y:integer;
begin
writeln('введите два числа');
readln(x);
readln(y);
if (x<1000000001) and (y<1000000001) and (x>0) and (y>0)
then writeln('сумма чисел =',x+y)
else writeln('диапазон чисел неверный');
end.
Если вдруг вам поверит учитель, можете перевыполнить поставленную задачу:
var x,y:integer;
s:string;
begin
randomize;
writeln('взять ли числа случайными? ответ да или нет');
readln(s);
if (s='да') or (s='Да') or (s='ДА') or (s='дА') then begin
x:=random(1000000000);
y:=random(1000000000);
writeln('сумма чисел =',x+y);
writeln('произведение чисел =',x*y);
end
else begin
writeln('введите два числа');
readln(x);
readln(y);
writeln('сумма чисел =',x+y);
writeln('произведение чисел =',x*y);
end;
end.
#include <iostream>
int main()
{
using namespace std;
cout << "Enter N: ";
int N;
cin >> N;
int * parr = new int[N];
for (int i = 0; i < N; ++i)
{
cout << "Enter #" << i + 1 << " element: ";
cin >> parr[i];
}
int kpos = 0, kneg = 0, kzer = 0;
for (int i = 0; i < N; ++i)
{
if (parr[i] > 0)
++kpos;
else if (parr[i] < 0)
++kneg;
else
++kzer;
}
cout << "Number of positive: " << kpos
<< "\nNumber of negative: " << kneg
<< "\nNumber of zero: " << kzer << endl;
return 0;
}