Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
адиль77
03.06.2021 18:02 •
Информатика
Решите по информатике if 15.даны три числа. найти сумму наибольших из них.
Показать ответ
Ответ:
Sashka15081
06.07.2020 22:39
Program z1;
var s:integer;
a,b,c:integer;
begin
write('a=');readln(a);
write('b=');readln(b);
write('c=');readln(c);
if (a>c) and (b>c) then writeln(a+b);
if (a>b) and (c>b) then writeln(a+c);
if (b>a) and (c>a) then writeln(b+c);
readln
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
ксззххххх
01.07.2021 12:38
Уисполнителя конструктор две команды, которым присвоены номера: 1. умножь на 3 2. прибавь один первая из них увеличивает число на экране в 3 раза, вторая - прибавляет...
ekaterina0405
23.12.2020 17:51
Эффективные ветрогенераторы Альтернативные источники энергии становятся крайне популярными в последнее время. Например, сети из ветрогенераторов являются довольно эффективными...
59494920948583
16.06.2021 07:48
Внутреннее представление числа 26,756 памяти компьютера...
laman2210
19.06.2020 20:03
Задать случайным образом 10 элементов массива: целые числа из интервала от -5 до 50. Найти: 1) Сумма нечётных элементов. 2) произведение элементов, стоящих на чётных местах....
pe4onkina
19.09.2021 19:32
Это информатика, логические выражения...
MeucaH123aksi
14.01.2021 16:25
1.Определить количество истинных высказываний (¬x ∧ y ∧ z) ∨ (¬x ∧ ¬y ∧ z) ∨ (¬x ∧ ¬y ∧ ¬z) 2. Определить количество истинных высказываний (¬x ∧ y ∧ z) ∨ (¬x ∧ ¬z) 3....
Danielkz02
23.07.2021 01:13
Задача №500. Парикмахерская В парикмахерской работают три мастера. Каждый тратит на одного клиента ровно полчаса, а затем сразу переходит к следующему, если в очереди...
ваня1234456786
30.08.2021 21:25
ОЧЕНЬ НУЖНО ОТ 1. Каков объем системы подсчета? 2. Сравните двоичную и десятичную системы счисления на диаграмме Венна и назовите различия? 3. Отметьте в ниже списке действий,...
Вирс123
09.03.2021 13:00
Сравни алгоритм с рисунком и определи строку с ошибкой. Изменить размеры: 2, 2, 0.5; Изменить цвет цилиндра на синий; Создать цилиндр: Изменить размеры: 0.5 0.5, 2; Разместить...
ниёля1
18.10.2020 00:31
1.Определите истинность следующего высказывания (X2) или (X5) и (X10) при X=12; 10 2.Пусть А=«Вторая буква гласная», В= «Третья буква согласная». Найти значение логического...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var s:integer;
a,b,c:integer;
begin
write('a=');readln(a);
write('b=');readln(b);
write('c=');readln(c);
if (a>c) and (b>c) then writeln(a+b);
if (a>b) and (c>b) then writeln(a+c);
if (b>a) and (c>a) then writeln(b+c);
readln
end.