СРОНО,ДАЮ 50 БАЛЛРВ,ТОЛЬКО ОТВЕТНУЖЕН,У МЕНЯ НА ВРЕМЯЗапиши программу на языке Паскаль

СРОНО,ДАЮ 50 БАЛЛРВ,ТОЛЬКО ОТВЕТНУЖЕН,У МЕНЯ НА ВРЕМЯ
Запиши программку на языке Паскаль для: y=0,еслиx0x,если01. (y:3:0)
Запусти программку и введи значение x=-14.

Число выведенное на экран:
????

Задать свой вопрос
Andrej Junusov
Сейчас напишу
1 ответ
Program one;
uses crt;
var
x,y:real;
begin
textcolor(11);
writeln('Введите число x: ');
readln(x);
if xlt;=0 then y:=0 else writeln(y:3:0);
end.
 
Халюнина Ульяна
А число то какое?
Женя
Срочннооо,тап только число какое то одно необходимо??
Denis Iznov
Число 0
Карина Верзилова
Я там еще ошибку сделал Правильно так *else y:=x writeln(y:3:0);*
Natasheva Nina
Но все одинаково ответ будет 0, если вести число -14
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт