Удвоить эти числа, если a < b < c, и заменить их абсолютными значениями, если это не так

@vlad36 · Регистрация: 08.03.2013

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

Даны Вещества. Числа : a, b, c. Удвоить эти числа, если a < b < c, и заменить их абсолютными значениями, если это не так. Нужно создать программу в PASCAL.

Новичок · 08.03.2013, 22:10

Сообщение от vlad36

Даны Вещества. Числа : a, b, c.

Вы имеете ввиду вещественные числа?

@vlad36 · 08.03.2013, 22:52 **[ТС]**

Да именно так

@ntrx · 09.03.2013, 02:45

Pascal

program dsf;
uses crt;
var a, b, c : real;
begin
     write('input a, b, c: ');
     readln(a,b,c);
     
     if (a < b) and (b < c) then begin
        a := 2*a;
        b := 2*b;
        c := 2*c;
     end
     else begin
         a := abs(a);
         b := abs(b);
         c := abs(c);
     end;
     writeln('a: ',a);
     writeln('b: ',b);
     writeln('c: ',c);
     
     readln;
end.

@vlad36 · 09.03.2013, 07:38 **[ТС]**

А тут пробелы стоят их обязательно писать?

@ntrx · 09.03.2013, 08:11

какие пробелы?

@vlad36 · 09.03.2013, 14:04 **[ТС]**

нет все в порядке я разобрался а номер строки указывать?

Добавлено через 3 часа 17 минут
А тут пустые строки их просто пропускать или что то в них вводить

@ntrx · 09.03.2013, 15:37

программа полностью готовая, и работоспособна по вашему требованию

@vlad36 0 / 0 / 0 Регистрация: 08.03.2013 Сообщений: 11
		1
	Удвоить эти числа, если a < b < c, и заменить их абсолютными значениями, если это не так 08.03.2013, 21:55. Показов 5126. Ответов 7 Метки нет (Все метки) Даны Вещества. Числа : a, b, c. Удвоить эти числа, если a < b < c, и заменить их абсолютными значениями, если это не так. Нужно создать программу в PASCAL. 0

Новичок 1642 / 1091 / 487 Регистрация: 17.07.2012 Сообщений: 5,345
	08.03.2013, 22:10	2
	Сообщение от vlad36 Даны Вещества. Числа : a, b, c. Вы имеете ввиду вещественные числа? 1

@vlad36 0 / 0 / 0 Регистрация: 08.03.2013 Сообщений: 11
	08.03.2013, 22:52 [ТС]	3
	Да именно так 0

@vlad36 0 / 0 / 0 Регистрация: 08.03.2013 Сообщений: 11
	09.03.2013, 07:38 [ТС]	5
	А тут пробелы стоят их обязательно писать? 0

@ntrx 123 / 123 / 82 Регистрация: 03.01.2013 Сообщений: 242
	09.03.2013, 08:11	6
	какие пробелы? 1

@vlad36 0 / 0 / 0 Регистрация: 08.03.2013 Сообщений: 11
	09.03.2013, 14:04 [ТС]	7
	нет все в порядке я разобрался а номер строки указывать? Добавлено через 3 часа 17 минут А тут пустые строки их просто пропускать или что то в них вводить 0

@ntrx 123 / 123 / 82 Регистрация: 03.01.2013 Сообщений: 242
	09.03.2013, 15:37	8
	программа полностью готовая, и работоспособна по вашему требованию 0

Опции темы