Èíôîðìàòèêà


              

Ñðàâíåíèå ðåçóëüòàòîâ âûïîëíåíèÿ ïðåäñòàâëåííûõ àëãîðèòìà


÷òåíèå (òîâ, ñ, ò)                                                   read tv$, ñ, m
ïðè òîâ = «» âûõîä                                                  if tv$ = «» then exit do
k := k + 1                                                                    k = k + 1
âûâîä (òîâ, ñ, ò)                                                      ? fv$; ñ; m
s :=s + cm                                                                   s= s + c(m
åñëè k = 1 òî                                                            if k = 1 then
max
:= c×m                                                                max = c×m
ToâMax
:= òîâ                                                         ÒÌ$ = tv$
èíåñ c(m > max òî                                                   elseif c(m > max then
max
:= c×m                                                               max = c×m
ToâMax := òîâ                                                       TM = tv$
êåñëè                                                                          end if
êöèêë                                                                         loop
âûâîä («cyììa=»,s)                                                  ? «cyììa=»,s
âûâîä («Ìàêñèìóì»)                                               ? «Ìàêñèìóì»
âûâîä (ToâMax, max)                                               ? TM$, max
êîí                                                                              end
 
Ñðàâíåíèå ðåçóëüòàòîâ âûïîëíåíèÿ ïðåäñòàâëåííûõ àëãîðèòìà è ïðîãðàììû ñ îïèñàíèåì âûáðàííîãî ñïîñîáà ðåøåíèÿ ïîêàçûâàåò èõ ïîëíîå ñîîòâåòñòâèå äðóã äðóãó.
 
 
 
 
 
 
 
 
 
 
 
Àëãîðèòì                                                      Ðåçóëüòàòû âûïîëíåíèÿ
àëã «ñóììà è ìàêñèìóì»
íà÷
âûâîä («ñïèñîê òîâàðîâ»)                           ñïèñîê òîâàðîâ
âûâîä («òîâàð öåíà êîë-âî»)                              òîâàð öåíà êîë-âî

Ñîäåðæàíèå  Íàçàä  Âïåðåä