Решите функцию на языке Паскаль : y=4x+a/b

fagsfssfs fagsfssfs    2   30.10.2020 19:54    2

Ответы
ThePashka ThePashka  29.11.2020 19:54

var a, b, x, y: Real;

begin

// Читаем значения

writeln('Input x:');

readln(x);

writeln('Input a:');

readln(a);

writeln('Input b:');

readln(b);

// Считаем значение функции

y := (4*x+a)/b;

// Выводим с точностью 3 знака после запятой

writeln(y:0:3);

end.

Объяснение:

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика