Анемподист
5 год назад
Срочно необходим ответ . Задайте число в интервале от 1 до 100. Составьте программу;(Паскаль), которая:-умножает это число на себя-складывает результат умножения с удвоенным исходным числом-делит полученную сумму на исходное число-вычитает из результата деления исходное число-выводит на экран окончательный результат
ОТВЕТЫ
Gergina
Oct 24, 2020
var
x, tmp:real;
begin
Read(x);
tmp:= x*x;
tmp:= tmp + 2*x;
tmp:= tmp / x;
tmp:= tmp - x;
Writeln(tmp);
end.
95
2
x, tmp:real;
begin
Read(x);
tmp:= x*x;
tmp:= tmp + 2*x;
tmp:= tmp / x;
tmp:= tmp - x;
Writeln(tmp);
end.
95
2
253
Смежные вопросы:
