Размер шрифта
A- A+
Межбуквенное растояние
Цвет сайта
A A A A
Изоображения
Дополнительно

Pascal - задачb (перед самостоят)

Составьте программу вычисления значения выражения, где a, x – целые числа. Значения a, x введите с клавиатуры:

Решение:

Program P1;

 Var a,x:Integer; y: Real;

 Begin

    Write('x='); Readln (x);

    Write('a='); Readln (a);

    y:=abs(x-3*a)/(x*x+2);

   Write('Ответ:',y);

End.

Разделы сайта