Решить по программе Паскаля: Ввести число

Решить по программе Паскаля: Ввести число. Если оно неотрицательно, вычесть из него 50, в противном случае прибаить к нему 100. If х>0then у: =х-50 elseу: х +100

в избранное

greenof

31 августа 2022

program sdd; uses crt; var x: integer; beginclrscr; write ('x='); readln (x); if x>0 then x: =x-50else x: =x+100; writeln (x); readkey; end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

Задайте свой вопрос

Известно, что рисунок состоит из 1310720 пикселей и занимает целиком весь экран дисплея

Ввели 3 числа выясните является ли их сумма нечетным числом?

Мыльный пузырь и надувной шарик похожи по составу, по действию или по признаку

Задача может быть успешно решена только тогда, когда она очень четко описана

Даны три действительных числа. Возвести в квадрат те из них, значения которыхнеотрицательны

Выполнить задания. 1) Заполнить пропуски числами: ___ Кбайт=8192 байт=____ бит 2) Свободный объем оперативной памяти…

Найти закономерность: 1-0, 2-0, 3-1, 4-1, 20-6,21-7

Задана окружность радиуса R. Составьте программу для нахождения ее длины и площади ограниченного еюкруга

27400

Алгебра

14822

Английский язык

14216

Биология

7369

Другой

720

18829

8304

15850

5255

11818

23332

15992

73118

8152

466

46271

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: