Составить программу по блок-схеме

@Ильдар1212 · Регистрация: 02.01.2011

Студворк — интернет-сервис помощи студентам

помогите пожалуйста составить программу

По представленной блок-схеме составить программу и вычислить результат

@lamed · 08.05.2011, 16:11

Не читается, не видно ничего. Можно только гадать

Начало
Ввод X
Если ..., то
...
Иначе если ..., то
...
Иначе
...
Вывод Y
Конец

@Ильдар1212 · 08.05.2011, 16:22 **[ТС]**

@lamed · 08.05.2011, 16:29

Pascal

var
  x, y: real;
begin
  readln(x);
  if (x<=-10) then
    y:= x*x+25-x
  else if (x>-10) and (x<=10) then
    y:= 3+abs(x)
  else
    y:= 1/x;
  writeln(y);
end.

@Ильдар1212 0 / 0 / 0 Регистрация: 02.01.2011 Сообщений: 10
		1
	Составить программу по блок-схеме 08.05.2011, 16:01. Показов 1250. Ответов 3 Метки нет (Все метки) помогите пожалуйста составить программу По представленной блок-схеме составить программу и вычислить результат Миниатюры 0

@lamed 298 / 298 / 150 Регистрация: 07.05.2011 Сообщений: 592
	08.05.2011, 16:11	2
	Не читается, не видно ничего. Можно только гадать Начало Ввод X Если ..., то ... Иначе если ..., то ... Иначе ... Вывод Y Конец 0

@Ильдар1212 0 / 0 / 0 Регистрация: 02.01.2011 Сообщений: 10
	08.05.2011, 16:22 [ТС]	3
	начало \| вводX \| да <---- X больше или равно -10 -------> нет \| \| \| да <----- -10 <X больше или равно 10 ----> нет \| \| \| Y=X2+25-X(X2-это X в квадрате) Y=3+\|X\| Y=1/X \|______________________________\|________________________________________\| \| Вывод Y \| \| конец Добавлено через 5 минут нажмите на картинку и она увеличится...))) 0

	08.05.2011, 16:29

Опции темы