Помощь - Поиск - Пользователи - Календарь
Полная версия: условный оператор
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Гость
Помогите пожалуйста решить мне задачу.В Паскале я ничего не понимаю(к сожалению), а решить очень нужно.Помогите кто может!Заранее благодарна.

Нужно написать программу, при выполнении которой все значения, вводимые с клавиатуры, изменяются по определённому условию: положительные числа уменьшаются вдвое, отрицательные возводятся в квадрат, а нули заменяются на единицу.
Рекомендуемый экран после запуска программы:
Введите число: -5
Результат: 25

arhimag
А ты пробовала хоть что-то сделать?
Ozzя
    
read(x);
if x>0 then
x:=x /2
else
if x=0 then
x:=1
else
x:=sqr(x);
мисс_граффити
     x:=x /2

х, судя по всему, real
if x=0 then

рискованно.... надо брать допустимую погрешность.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.