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

@Qudeea · Регистрация: 10.10.2012

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

Здравствуйте, помогите выполнить эту задачу.

HighPredator · 19.10.2012, 13:41

Pascal

program Test;
 
var
  x,y:real;
 
begin
  readln(x);
  if x<=-50 then y:=500
  else if (x>-50) and (x<=50) then y:=3+2*abs(x)
  else y:=abs(x*x*x);
  writeln(y:0:4);
  readln;
end.

Если уж прикладываете изображение, то прикладывайте четкое. Не очень хочется глаза ломать.

@Qudeea 0 / 0 / 0 Регистрация: 10.10.2012 Сообщений: 5
		1
	Составить программу по блок-схеме 19.10.2012, 13:30. Показов 1390. Ответов 1 Метки нет (Все метки) Здравствуйте, помогите выполнить эту задачу. Миниатюры 0

	19.10.2012, 13:41

Опции темы

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

Решение