Program n_1
Var A: array [1..111] of {тип}
Begin
{Тело программы}
End.
Типы
Real
Integer и др.
1,5Тб = 15000000000Кб значит 15000000000Кб-1= 14999999999
Блин ответ на языке крутится не могу это написать
Уже писала, но напишу еще раз. Указывайте на каком языке программирования нужно писать программу.
program ff;
var
y,x:real;
begin
writeln('Введите x');
readln(x);
if x>=2 then
y:=sin(x)/sqr(x)
end;
if x<2 then
begin
y:=(x+8)/(x-2);
end;
writeln('y=',y);
readln();
end.
Программа:
var x,y: real;
begin
write('x, y: ');
readln(x,y);
if (y>=x*x)and(x<=1)
then writeln('принадлежит')
else writeln('не принадлежит');
end.
Пример:
x, y: 0.5 2
принадлежит