Ответы на вопрос:
Var a,b,c: integer; begin readln (a,b,c); if (a+b> c) and (a+c> b) and (b+c> a) then writeln(существует) else writeln(нет); end.
Популярно: Информатика
-
Найдите значения выражений: 1) (1или1)или(1или0) 2) ((1или0)или1)или1) 3)...
Иришка9Класс23.03.2023 11:36 -
Из двадцати одноклассников десять изучают язык, восемь – . четверо изучают...
рома125403.10.2022 03:28 -
Как определить характер передачи информации? болела и пропустила тему не...
Yana250219.03.2021 06:54 -
Вцветовой модели rgb для кодирования одного пикселя используется 8 байта....
goum115.01.2020 06:13 -
1.даны два числаa и b.найдите их сумму и произведение . 2.даны стороны a...
снежана19524.07.2021 02:44 -
Файл размером 20 мбайт передаётся через некоторое соединение за 120 секунд....
NikitosBarbos0614.01.2020 03:12 -
Синформатикой) 1) дан массив от 0 до 100. найти минимальный нечётный элемент...
ruslangusen03.05.2021 02:34 -
Дан числовой массив а, состоящий из n натуральных чисел. определите количество...
78560027.12.2021 07:59 -
Нужно найти 10 ошибок. немного найдётся людей,кто не знаком с живописным...
Aika221628.11.2022 22:46 -
Какое значение будет принимать переменная x после выполнения фрагмента программы?...
nata1237727.01.2023 17:55