Написать программу на паскале последующего образца a+b*b/c

Написать программку на паскале последующего образца a+b*b/c

Задать свой вопрос
2 ответа
Var
a,b,c:integer; x:real;
begin
write('Введите A=');read(a);
write('Введите B=');read(b);
write('Введите C=');read(c);
x:=a+b*b/c;
write('X=',x);
end.
Денчик Пуш
для чего расходовать излишнюю переменную?
Var   a, b, c : real; begin   readln(a, b, c);   writeln(a+b*b/c); end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт