составить программу вычисления величины у при заданном значении аргумента

@xamelione25 · Регистрация: 04.02.2013

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

система из 4х уравнений
y=
1) a;при x>(a+|c|)
2) c;при-d<x<0
3) -x-d-c;при x<-d
4) x-c;при 0<x<(a+|c|)

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

@Puporev · 08.02.2013, 09:52

Pascal

uses crt;
var a,c,d,x,y:real;
    k:byte;
begin
clrscr;
repeat
write('Введите a>0 a=');
readln(a);
until a>0;
write('c=');
readln(c);
repeat
write('Введите d>0 a=');
readln(d);
until d>0;
write('x=');
readln(x);
k:=0;
if x>a+abs(c) then y:=a
else if (x>-d)and(x<0) then y:=c
else if x<-d then y:=-x-d-c
else if (x>0)and(x<a+abs(c)) then y:=x-c
else k:=1;
if k=0 then write('y=',y:0:2)
else write('Для данных значений y не определен');
readln
end.

@xamelione25 -4 / 5 / 2 Регистрация: 04.02.2013 Сообщений: 1,658
		1
	составить программу вычисления величины у при заданном значении аргумента 07.02.2013, 23:05. Показов 1543. Ответов 1 Метки нет (Все метки) система из 4х уравнений y= 1) a;при x>(a+\|c\|) 2) c;при-d<x<0 3) -x-d-c;при x<-d 4) x-c;при 0<x<(a+\|c\|) предусмотреть ввод в программу параметров если они есть и значения аргумента х с клавиатуры. предусмотреть вывод на экран значений параметров аргумента х и вычисляемых величин. программа должна быть на турбо пакале 0

Опции темы

составить программу вычисления величины у при заданном значении аргумента

Решение