Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
кккк50овд
09.01.2020 07:36 •
Информатика
.(Вкомпьютер поступают результаты соревнований по плаванию (количество минут и секунд) для трех спортсменов. составьте программу, которая выводит на экран лучший результат.).
Показать ответ
Ответ:
cooldasha11042
23.05.2020 17:17
Var
best, m, s,i: integer;
begin
best := 10000000;
for i:= 1 to 3 do begin
write('min sec = ');
readln(m, s);
if best > m * 60 + s then best := m * 60 + s;
end;
writeln('Лучший = ', best div 60, ' min ', best mod 60, ' sec');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
aikosyatb
08.04.2021 03:44
Два игрока, Петя и Ваня, играют в следующую игру. Перед игроками лежат две кучи камней. Игроки ходят по очереди, первый ход делает Петя. За один ход игрок может добавить...
0007инкогнет0007
08.03.2022 04:07
Чему равна сумма элементов a[1] и a[4] массива, сформированного следующим образом?for i:=1 to 5 do a[i]:=i*i;а) 5б) 15в) 55г) 40...
remixzx60
24.02.2020 20:41
Сканируется цветное изображение размером 27,94×27,94см. разрешающая сканера — 600×1200 dpi, глубина цвета — 24 бита. какой информационный объём будет иметь полученный...
Kiper222
18.01.2021 11:19
Доброго времени суток. имеется вот такой шифр, предположительно должно получиться слово или сочетание слов или высказать предположения/мысли. мне в голову приходит...
марго419
15.05.2023 17:44
Потенциальные опасности, которые могут представлять социальные сети для неопытных пользователях...
IlyaLS
15.05.2023 17:44
Оценки, полученные спортсменом в соревнованиях по фигурному катанию (в ), хранятся в массиве из 18 элементов. в первых шести элементах записаны оценки по обязательной...
тагієва
16.11.2021 09:42
Вмассиве хранятся сведения о стоимости товаров, проданных фирмой за каждый день марта. определить количество дней, в которые стоимость проданных товаров превысила...
Snowandsand368
16.11.2021 09:42
Реши , используя программу ms excel. алина отправилась в магазин за покупками. девушка купила пачку молока за 36 руб., две упаковки замороженных овощей, заплатив...
kotovad444
06.06.2022 09:08
Создать одномерный массив, содержащий целые числа. элементы массива вводятся с клавиатуры. найти номера всех элементов больше 5 (вывести их на экран), если таких...
5675566
24.12.2021 01:54
Уваси есть доступ к интернет по высокоскоростному одностороннему радиоканалу, обеспечивающему скорость получения им информации у васи есть доступ к интернет по высокоскоростному...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
best, m, s,i: integer;
begin
best := 10000000;
for i:= 1 to 3 do begin
write('min sec = ');
readln(m, s);
if best > m * 60 + s then best := m * 60 + s;
end;
writeln('Лучший = ', best div 60, ' min ', best mod 60, ' sec');
end.