tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Написать программу если
Написать программу если x меньше 0, то найти x^2. иначе x уменьшить в 2 раза.
Rzaevat
2 16.08.2019 07:10
1
Ответы
FCMM
04.10.2020 22:29
{PASCAL}
var x:real;
begin
write('Введите число: ');
readln(x);
if x<0 then x:=sqr(x);
else x:=x/2;
writeln(x:4:1);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Nope2281
09.09.2019 20:00
Вкомпьютер вводятся два числа. если первое больше второго, то напечатать их сумму, иначе - произведение. после этого напечатать текст решена....
ShudrenkoArtem
13.07.2019 12:50
Даны два неотрицательных числа a и b . найти их среднее т.е. квадрат. корень из их произведения (ab)в квадрате...
дашик27
14.04.2020 12:26
Тапсырма 1А)Терезенің қай бөлігі көрсетілген? Атауын жаз.27Б) Берілген терезе мәзірінде қандай батырмаларорналасқан?...
Кологривко
14.04.2020 12:26
2 d графикпен 3d графигин салыстыру...
Sergey15211
18.08.2019 18:10
Сколько бит информации содержится в текстовом (набранном на компьютере) сообщении в кодировке ascii: « какая ночь! мороз трескучий, на небе ни единой тучи; как шитый...
sychewaya8310
18.08.2019 18:10
Сколько бит информации содержится в текстовом (набранном на компьютере) сообщении, закодированном в кодировке unicode: « вот ветер, тучи нагоняя, дохнул, завыл – и вот...
KotyaFila
08.05.2021 18:02
Вычислить произведение нечетных чисел от 1 до 99Среда Паскаль!...
vani2006
08.05.2021 18:04
Подскажите , стоит брать за 37к или нет? Продам игровой компьютер. Материнская мощная плата под разгон: GIGABYTE Z370N mini со встроенным двухдиапазонным wi fi приёмником,...
milana23456789
08.05.2021 18:05
Идентификационные номера (ID) 459 пользователей занимают в памяти 3672 байта. Каждый такой ID в компьютерной системе записывается минимально возможным и одинаковым целым...
nastiia4
20.10.2020 06:49
Задание 7. Составить видовые пары глаголов Образец: Являться (несов.в) – явиться(сов.в.)Праздновать –Отмечать –Гулять –Радоваться –...
Популярные вопросы
Вкаких организациях участвовал петр лаврович лавров ? в чем суть...
2
Собственная скорость 5км/ч и скорость против течения 3км/ч то скооллько...
3
Найдите высоту проведённую к стороне треугольника а, где а=24, b=25...
2
Вкаких случаях частица -не- пишется слитно с деепричастием?...
3
Какая организация в конце xix в. возглавила индийское национально-освободиьельное...
2
Сколько в 70000 ар будет квадратных киллометров?...
2
Установи закономерность и продолжи ряд чисел 16009,16008,16006,...
3
Скласти 2 речення з дієприкметниками заквітчений ,посивілий...
3
Тему призначення мистецтва о.с.пушквн розкриває у творі : а) євгеній...
1
Слова в которых 3 буквы и 3 звука. первая буква р, вторая буква -...
1
var x:real;
begin
write('Введите число: ');
readln(x);
if x<0 then x:=sqr(x);
else x:=x/2;
writeln(x:4:1);
end.