Задача 1: Вычислить значение выражения для любого числа х y=3x2-4
Uses crt;
Var X,Y: Real;
Begin
Writeln ('Введите X');
Read (X);
Y:=3*X*X-4;
Writeln('X=',X);
Writeln('Y=',Y);
END.

Smitanka228    3   30.11.2021 13:34    0