1)Рассчитать значение y при заданном значении x:
Y=Sinx2 при x>0 В противном случае Y=1+2Sin2x
2)Даны 4 вещественных числа. Определить, сколько из них отрицательных. Оператор цикла не использовать.
3)Даны x1, y1 координаты левой верхней и х2, y2 координаты правой нижней вершин прямоугольника. Точка А(х,у) принадлежит прямоугольнику, стороны которого параллельны координатным осям.
4)Сумма каких-либо двух цифр заданного трехзначного натурального числа N равна третьей цифре.
№ 1 | Автор: kas |
2012-03-11, 08:36
|
Репутация: [ + 0 ]
|
|
|
№ 1 | Автор: kas |
2012-03-11, 08:36
|
Репутация: [ + 0 ]
|
|
|
|
1.
var
x:integer;
y:real;
begin
read(x);
if x>0 then y:=sin(x)*2 else y:=1+2*sin(2*x);
writeln(y:2:2);
end.
2.
var
s,a,b,c,d:integer;
begin
s:=0;
readln(a,b,c,d);
if a<0 then s:=s+1;
if b<0 then s:=s+1;
if c<0 then s:=s+1;
if d<0 then s:=s+1;
writeln(s);
end.
3. Не понял задания
4. И что? Задание какое? Напиши пример ввода-вывода
Нужна помощь? Сюда: vkontakte.ru/berestovskiy
|
|
|
|
