Вычислить значение функции при заданном значении аргумента

@алексей007 · Регистрация: 09.05.2013

Написать программы для решения предложенных ниже задач. Пользователь вводит допустимое значение х, программа выдает результат.
у=1+x²

@iKarma · 09.05.2013, 14:52

Delphi

uses crt;
var
   y, x: real;
BEGIN
    clrscr();
    write('x='); readln(x);
    y := 1+sqr(x);
    writeln(y);
    readln;
END.

Не проверял работоспособность.

@алексей007 · 09.05.2013, 14:56 **[ТС]**

не правельно записал я там у=квадратный корень из 1+x в квадрате

@iKarma · 09.05.2013, 15:00

Сообщение от алексей007

не правельно записал я там у=квадратный корень из 1+x в квадрате

Delphi

1	y := sqrt(1+sqr(x));

@алексей007 · 09.05.2013, 15:15 **[ТС]**

iKarma, спасибо большое ...а как блог схема приблезительно будет выгледить не подскажешь?

@iKarma · 09.05.2013, 15:21

По блокам:
1) Начало.
2) Ввод х.
3) Вычисление y.
4) Вывод y на экран.
5) Конец.

Как-то так.

@алексей007 0 / 0 / 0 Регистрация: 09.05.2013 Сообщений: 21
		1
	Вычислить значение функции при заданном значении аргумента 09.05.2013, 14:44. Показов 1893. Ответов 5 Метки нет (Все метки) Написать программы для решения предложенных ниже задач. Пользователь вводит допустимое значение х, программа выдает результат. у=1+x² 0

@алексей007 0 / 0 / 0 Регистрация: 09.05.2013 Сообщений: 21
	09.05.2013, 14:56 [ТС]	3
	не правельно записал я там у=квадратный корень из 1+x в квадрате 0

@алексей007 0 / 0 / 0 Регистрация: 09.05.2013 Сообщений: 21
	09.05.2013, 15:15 [ТС]	5
	iKarma, спасибо большое ...а как блог схема приблезительно будет выгледить не подскажешь? 0

@iKarma 10 / 10 / 1 Регистрация: 17.10.2011 Сообщений: 114
	09.05.2013, 15:21	6
	По блокам: 1) Начало. 2) Ввод х. 3) Вычисление y. 4) Вывод y на экран. 5) Конец. Как-то так. 0

Опции темы