5 lines
104 B
ObjectPascal
5 lines
104 B
ObjectPascal
|
##
|
||
|
|
foreach var s in ReadLines('data.txt') do
|
||
|
|
if StrToFloat(s.ToWords(' ')[2]) > 6 then
|
||
|
|
s.Println;
|