tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Написать программу для вычисления
Написать программу для вычисления x<0, то y=|x| иначе y=x^2
Bbob
3 07.12.2020 14:38
0
Ответы
ледяннойкристалл
06.01.2021 14:38
var x, y:Integer;
begin
readln(x);
if x < 0 then
y:=abs(x)
else
y:=sqr(x);
writeln(y);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
linagurova6545
02.03.2021 17:40
Какая операция с текстом должна быть выполнена при форматировании текста?...
daut2001
07.09.2019 18:20
1111101²+af16= это по информатике 8кл нужно .заранее...
03222
07.09.2019 18:30
Информатика 1100011²-10111² с решением...
abobov1234
07.09.2019 18:30
Верно записано имя файла 6кл@ 6кл? 6кл& 6кл! далее...
VUNDURKIND1
22.12.2020 15:27
1. Решите задачу не используя циклы! Дана строка. a) Сначала выведите третий символ этой строки. b) Во второй строке выведите предпоследний символ этой строки. c)...
kisilevars2003
15.08.2019 06:20
Высказывания-тоже объекты. они имеют свойство истинность. перечислс его значения:...
elenashyplukova
15.08.2019 06:20
Представьте десятичные числа в беззнаковом 8-разрядном формате: 65 и 125...
чебурек2283
02.10.2019 12:00
1) 81 в степени0.75; 2) 32 в степени -0.4...
ФрискТок
02.10.2019 12:00
Для изготовления напитка взяли 3 л малинового сиропа по цене 45 руб. за 1 л и 25 л родниковой воды по цене 3 руб. за 1 л. какова цена 1 л получившегося напитка?...
danilkudo423
02.10.2019 12:00
Построить все интервалы верх от соль и соль диез...
Популярные вопросы
Оносительно молекулярная масса молекулы бертолетовой соли равна:...
3
Провідміняти на російській мові числівники 888,1785, 149, 133,...
1
Вледниковый период на земле в пещерах жили пещерные медведи....
3
Как правильно записать глагол а скобках i (to have) a very good...
2
Ручка стоит 40 тенге, а тетрадь на 30 тенге дешевле, линейка...
3
Что общего в развитии астраханского и казанского ханства ? !...
2
Нужно написать сочинение на тему хочу ли я жить дольше других....
1
Отримаєте 30 ів дружби у давньогрецькій міфології...
3
Как будет по буквами великолепный кевин?...
1
Основна думка вірша співець леся українка...
2
var x, y:Integer;
begin
readln(x);
if x < 0 then
y:=abs(x)
else
y:=sqr(x);
writeln(y);
end.