Предмет: Информатика,
автор: Ujuanna
Задан набор пар положительных чисел x1,y1, x2,y2,… . Признак завершения ввода чисел – 0.
Напишите программу решения задачи на языке Паскаль.
x1=4,1,x2=7,8,x3=3,6,x4=6,7,x5=0.
y1=2,1,y2=8,2,y3=3,3,y4=5,7;y5=0.
Приложения:
Ответы
Автор ответа:
1
var
x,y:real;
begin
while true do
begin
readln(x);
if x=0 then break;
readln(y);
x:=2*x+1;
y:=ln(y*y+2)/ln(10);
writeln(x/y);
end;
end.
Интересные вопросы
Предмет: Русский язык,
автор: MissWow
Предмет: Қазақ тiлi,
автор: Аноним
Предмет: Английский язык,
автор: Айлин12
Предмет: Физика,
автор: sniper07
Предмет: Математика,
автор: barbara604