Помогите составить программы к задачам 8 , 10 пожалуйста срочно надо)))

8.
Program zadanie_8;
Var a,b,c:real;
Begin
Writeln(Введите значения A,B,C);
Readln(a,b,c);
If (a Writeln(a);
End.
10.
Program zadanie_10;
Var x:real;
Begin
Writeln(Введите значение x;);
Readln(x);
x:=(4*sqr(x)+7)/3*x-6;
Writeln( $frac{ 4x^{2}+7 }{3x-6}$ =,x);
End.

Оцени ответ

Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Найти другие ответы