Регистрация
karinkacommelЛіза
19.03.2021 01:33
Информатика
Есть ответ 👍

Решите ! дана последовательность чисел оканчивающихся на 0 ,посчитать количество положительных и отрицательных чисел ! язык паскаль.

120
434
Посмотреть ответы 1

Ответы на вопрос:

kozlovaangelina
kozlovaangelina
4,4(58 оценок)

var a,x: real;

begin

writeln('Введите x');

readln(x);

if x<-3 then

begin

writeln('Нет ответа')

end;

a:=0;

a:= Sin(Sqrt(Sqr(x+3)*x))/(Sqr(x)+1);  

writeln(a);

end.

Популярно: Информатика