Дописать программу на языке freebasic.даны результаты бега n спортсменов в конькобежном многоборье на 4-ч стандартных дистанциях: 500м, 1000м, 5000м, 10000м. результаты(времена на дистанциях) должны вводится реальные(сек; мин., сек; мин., сек; мин., сек.сформировать таблицу по дистанциям и суммарные всех участников, приводя времена к 500-метровой дистанции(выражая все в секундах), число пропорционально времени в секундах. вывести таблицу, в которой участники соревнований отсортированы по местам, занятым ими( в формате: фамилия, по дистанциям, сумма , место).исходная информация вводится с клавиатуры.(далее идет сама прога).cls type turnir family as string vrema5 as single vrema10 as single vrema50 as single vrema100 as single end type input"vvedite kolichestvo uchastnikov",n dim ch(i) as turnir cls for i = 1 to n print " : "; i input "vvedite familiju: ", ch(i).family input "vvedite vrema(sec) 500m: ", ch(i).vrema5 input "vvedite vrema(sec) 1000m: ", ch(i).vrema10 input "vvedite vrema(sec) 5000m: ", ch(i).vrema50 input "vvedite vrema(sec) 10000m: ", ch(i).vrema100 next i print " za distancii(500m,1000m,5000m, " for i = 1 to n b1! = (ch(i).vrema5)* 0.1 b2! = (ch(i).vrema10)* 0.1 b3! = (ch(i).vrema50)* 0.1 b4! = (ch(i).vrema100)* 0.1 summb! = b1! +b2! +b4! +b3! print"familiya "; rtrim$(ch(i).family); " "; "balli: "; b1! ; " "; b2! ; " "; b3! ; " "; b4! ; " "; "summa ballov: "; summb! next iно у меня не получается отсортировать
"Я самый главный!"- заявил монитор, на мне возникает информация и изображения.
"Нет, я самая главная,- сказала клавиатура, без меня никак, не сможешь ничего оттреадактировать,вбить информацию в память, общаться - да вообще ничего!"
Но память возразила : " Ээх вы, я тут главнее всех, как вы без меня! Ничего не сохранишь, не запомнишь, да в общем без меня очень сложно что-то представить!"
"Да вы что? - начал возмущаться процессор, - Главных не должно быть, мы все представляем собой одно целое!" Так они и воссоединились и представляют собой одну частичку главного .
¬А отрицание А, то есть х не принадлежит А
перепишем и упростим исходную формулу
P→((Q∧¬A)→P)
известно что X→Y=¬X∨Y (доказывается просто, например через таблицу истинности)
тогда:
P→(¬(Q∧¬A)∨P)
раскроем скобку ¬(Q∧¬A) с закона де Моргана (стыдно их не знать, если что это такие же основы как и таблицы истинности)
P→(¬Q∨¬¬A∨P) = P→(¬Q∨A∨P) = ¬P∨¬Q∨A∨P
¬P∨P=1 то есть всегда истинно и 1∨Х=Х значит ¬P и P можно убрать
остается ¬Q∨A
Значит х либо принадлежит А либо не принадлежит Q
для выполнения этого условия необходимо чтобы все значения Q принадлежали А, тогда минимальное А совпадает с Q
ответ А=[40,77]